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This manual descrikes the logic of the 
OS/VS2 Supervisor, its relationshifr to the 
other portions of the control program, and 
the interaction between supervisor modules. 
The information in this manual is intended 
for personnel who are responsikle for 
determining sources of error within or mak- 
ing modifications to the VS2 Supervisor. 


Two short sections that follow this pre- 
face can help you use this manual effec- 
tively. “How This Manual Is Organized" 
describes the organization of the manual: 
where to find Overview material to refresh 
your memory, and where to find detailed 
information to correct errors or modify the 
system. “How to Read the Method-of- 
Operation Diagrams" explains the format of 
the diagrams and the symbols that are used 
in the diagrams. 


The communications task and checkpoint/ 
restart logic are not documented in this 
Manual. The communications task is docu- 
mented in the OS/VS2 Job Management Logic 
PLM, Order No. SY28-0649; checkpoint/ 
restart logic is documented in the OS/VS 


Checkpoint/Restart Logic PLM Order No. 
SY24-5159. 


Prerequisite Knowledge and Reading 


If you do not know the basic concepts of 
and services provided Ly the VS2 Supervi- 
sor, you should read the following 
publication: 


OS/VS Supervisor Services and Macro 
Instructions, GC27-6979 


Other Publications to Which the Text Refers 


The publications listed below are 
referred to within the section shown in 


Notice to Reader: 


PREFACE 


parentheses. The publications are listed 
alphabetically according to the first 
descriptive word in the title. 


OS/VS Debugging Guide (Termination), 
GC28-0632 


OS/VS2 Dynamic Support System Logic 
(Interruption Supervision), SY28-0679 


OS/VS2 IPI and NIP Logic (Virtual 
Storage Supervision), SY27-7243 


OS/VS2 Job Management Logic 


(Termination), SY28-0620 


OS/VS_ OPEN/CLOSE/EOV Logic (Contents 
Supervision), SY¥26-3785 


OS/VS2 Planning and Use Guide (Introduc- 
tion), GC28-0600 


CS/VS Recovery Management Surfport Logic 
(Interruption Supervision), SY27-7252 


OS/VS2 Service Aids Logic (Termination), 
GY28-0635 


OS/VS_ TCAM Logic (Termination), 
GY30- 2039 


OS/VS2_ TSO Control Program Logic (Timer 
Supervision and Termination), 


SY 28-0649 


No IBM publication order 
numbers are provided in references to puk- 
lications in the body of this manual. 
Please use the list above to find the order 
number for publications you find mentioned 
in the text. 
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HOW THIS MANUAL IS ORGANIZED 


This manual, which describes the logic 
of the VS/2 supervisor, is divided into two 
volumes. Volume 1 (Sections 1 through 9) 
uses text, conventional illustrations, and 
method-of-operation diagrams to explain 
basic concepts and to describe how the 
Supervisor works. In addition, Volume 1 
contains a glossary of terms and acronyms 
used in this publication. Volume 2 con- 
tains tables and other reference material 
that is to be used in conjunction with 
Volume 1 to isolate supervisor errors. 


The sections in Volume 1 are: 


1: WHAT THE SUPERVISOR IS AND DOES 
Briefly describes the functions per- 
formed by the supervisor. This sec- 
tion explains the general operation of 
the supervisor and describes the rela- 
tionship of the supervisor to the 
computer. 


The diagrams at the end of this sec- 
tion illustrate how the supervisor 
processes interruptions and where it 
passes control to perform the services 
required by those interruptions. 

These diagrams are also a visual table 
of contents for the rest of the dia- 
grams in Volume 1. 


2: INTERRUPTION SUPERVISION 

3: TASK SUPERVISION 

4; CONTENTS SUPERVISION 

5: PAGING SUPERVISION 

6: VIRTUAL STORAGE SUPERVISION 
7: TIMER SUPERVISION 


8: TERMINATION 
Each of these sections (2 through 8) 
describes one major area of the super- 
visor: “Interruption Supervision," 
"Task Supervisicn,™ “Contents Supervi- 
sion,“ and so on. Each section 
explains the basic concepts and gener- 
al logic of the functional area, 
including descriptions of operational 
characteristics such as queuing tech- 
niques and the use of control blocks. 


The descriptive material in each sec- 
tion is followed by a set of method- 
of-operation diagrams. The first dia- 
gram is a table of contents for the 
detailed diagrams in the set. The set 
also includes overview diagrams that 
illustrate the functional flow and 
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refer you to the more detailed dia- 

grams in the set. These detailed dia- 

grams illustrate the input, processing ‘ 
steps, and output, and they contain wi 
symkolic names that tie the processing 
steps to the progran listing. Parti- 
cularly complex functions are also 





flowcharted. The flowcharts fcllow 
the detailed diagram for that 
function. 

GLCSSARY 


Defines terms and acronyms used in 
this puklication. 


The sections in Volume 2 are: 


10: 


11: 


12: 


13: 


PRCGRAM ORGANIZATION 


Program Organization Diagrams 
Iilustrates the program structure 
for each function. These diagrams 
contain module names, routine names, 
and entry points. 


Synopses of Routines 
Lists each major routine in the 
Supervisor in alphabetic order and 
provides a short description of the 
routine. 


DIRECTORY 

Consists of three tables: the “Module 
Directory," the “Entry Point Cirec- 
tory," and a table of routines invoked 
by SvC instructions. 


DATA AREAS 

Describes the major data areas and 
control blocks used by supervisor 
modules. 


DIAGNOSTIC AIDS 


Registers on Entry and Exit 
Lists the register contents upon 
entry to and exit from each routine. 
The entries are arranged alphabetic- 
ally by entry point name. 


Control Blocks Referenced and Set 
Matrix 
Cross-references control blocks to 
the supervisor modules that 
reference or set then. 


Completion Codes, Wait State Codes, 
and Messages Tables 
Lists completion codes, wait state 
codes, and messages and identifies 
the function and the segment of code 
within the function that caused the 
code or message to be issued. 


HOW TO READ THE METHOD-OF-OPERATION 
CIAGRAMS 


The method-of-operation diagrams 
illustrate the functions performed by the 
supervisor. There is a set of these dia- 
grams for each major component. The first 
diagram in each set is a visual table of 
contents. 


Within each set, the diagrams are 
arranged in a hierarchy, starting with the 
least detailed diagram (usually, an over- 
view diagram) and continuing to the most 
detailed. The detailed diagrams illustrate 
the input, the processing steps, and the 
output for each function performed. 


The detailed diagrams are read left to 
right, top to bottom. The input on the 


left is labeled and boxed, as is the output 
on the right. The processing is divided 
into a series of steps, numbered sequen- 
tially. If further explanation of a pro- 
cesSing step is needed, that explanation 
appears in the notes on the page facing the 
diagram. The notes also contain symbolic 
names so that you can get to the pertinent 
code in the program listing as quickly as 
possible. 


Arrows are used to signify data move- 
rent, data reference, data modification, 
and processing flow. The arrow conventions 
are shown in Figure aa. 


Other conventions used in the detailed 
method-of-operation diagrams are illus- 
trated and explained in Figure ab and 
Figure ac. 


Primary Entry/Exit Path -- Shows the path 





followed to accomplish the principle function 


of the body of code described by the diagram. 


Secondary Path -- Shows the path used by a 


processing step to accomplish a subordinate 
function. 


Pointer -- Shows that a field in one data area 
contains the address of another field or data 
area. 


Data Reference -- Shows that the contents of 
a data area are tested or read to determine 
the course of subsequent processing. 


Data Transfer -- Shows that data from one 
location is moved or copied into another 
location. 


AVALARRRRP Control Information Modification -- Shows 
the setting or changing of switches or pointers 
that will be used to determine the course of 
subsequent processing. 


Interruption -- Shows the path followed when 
—_gv— an 1/0, SVC, external/timer, program, or 
machine interruption occurs. 


Figure aa. Legend showing meaning of arrows 
in method-of-operation diagrams. 





TA 


This symbol indicates 
that there is a note on 
the facing page that 
pertains to this segment 
of input or output. 


Control block fields 
are shaded when they 
are not involved in 
this diagram. Shading 
is not meant to show 
exact displacement. 


Figure ab. 


These numbers indicate 
processing steps. If 
further explanation of 
a step is needed, it is blocks. 
provided in the notes 

on the facing page. 


From ABC to 
update the CB 






Input 
1 












Register | 


Adcress of CB 
Register 14 


Return address 


ae | 1 









CB 
CBFIELD 


A pair of these symbols 
is used in place of an 
arrow when it is not 
possible to draw an 


arrow. 


Sample Method-of-Operation diagram 


Entry points are shown 
within the processing 
block and subroutine 


Processing 


IEAPOINT 


Subroutine blocks 
within the processing 
block indicate the 
subroutine is contained 
within the same module 
as the processing steps. 


Diagram 0.1 
Sample Diagram 


Output 





ee 
Find new valve. ENPOINT 

0.2 
Update CB. MRERRBAREBaaaa ! CBFIELD 





If already done > 4 


External Routine | 


IEAPNT 
ml 
0.9 


ee 


Record the change. 


If special processing 
is required. 


Register 15 







Set return code, Return code = 0 


To Caller 


An arrow pointing to a 
number outside the 
processing block means 
that processing 
continues on another 
diagram indicated by 
the number, 





Diagram number and 
title for this diagram. 


An arrow pointing to a 
number within a 
processing block means 
that processing 
continues at the step 
on this diagram 
corresponding to the 
number. 


Subroutine blocks 
shown outside the 
processing block 
indicate routines are 
not in the same module 
as the processing steps. 


A number in the lower 
right-hand corner of a 
subroutine block 
indicates the method of 
operation diagram that 
describes the subroutine 
in more detail. 


showing the diagramming conventions used in this manual. 
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C ( C 


Number and name of Method-of-Operation 
diagram to which Notes apply. 








Diagram 0.) Sample Diagram (Module IEAXx) 


Label within the routine at which 
code for the processing step begins. 


Notes associated with the portion of the diagram where 
[J] appears. 







There are no detailed 


Notes for Step 1. CBUPDT |IEAPOINT# 
notes for Steps 4 and 5, L . 


| ENPOINT 
| 









2 Notes for Step 2. 


3 Notes for Step 3. 


Routine that performs Step 1. 


The number 5 appears even though there are no 
notes for Step 5, because there is an identifiable 
routine name or label associated with the step. 


Figure ac. Sample extended-description page for a Method-of-Operation diagram. 
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The VS2 supervisor is one part of the 
control program of the IBM OS/VS2 Operating 
System; it controls the basic computing 
system and programming resources needed to 
perform several data processing tasks con- 
currently. The supervisor manages real 
(main) storage and auxiliary storage so 
that problem programs can occupy and use an 
address range greater than the address 
range of real storage. This address space 
is called virtual storage. 


Job steps, designated by the job manage- 
ment routines as tasks, are carried out 
under the control of the supervisor, which 
allocates needed resources on the basis of 
priorities. The supervisor assigns the 
resources to perform tasks, keeps track of 
all such assignments, and ensures that the 
resources are freed upon task completion. 
If one resource is required by several 
tasks, the supervisor queues requests for 
the resource and controls use of the 
resource. By handling competing demands 
for resources and by controlling the execu- 
tion of programs, the supervisor ensures 
more efficient use of the central proces- 
Sing unit, real storage, auxiliary storage, 
system and user programs, and other system 
resources. 


Besides the supervisor, the control pro- 
gram consists of the job management, input/ 
output supervision, data management, and 
recovery management components. The entire 
control program is introduced in the VS2 


Planning and Use Guide. 


BASIC CONCEPTS OF VIRTUAL STORAGE 
SUPERVISION 


A virtual storage system introduces a 
number of new machine and programming con- 
cepts. Among these are: 


e The concept of virtual storage as 
opposed to real storage. 


e The concept of translating addresses 
from virtual addresses to real 
addresses. 


e The concept of paging, which is the 
process of moving fixed-size pages of 
code and data into and out of real 
storage. 


These concepts are described in the follow- 
ing subsections. 


WHAT THE SUPERVISOR IS AND DOES 


CONCEPT OF VIRTUAL STORAGE 


The VS2 supervisor manages virtual 
storage so that users can effectively use 
virtual address space as though it were 
real storage. The virtual storage address 
space is divided into blocks of 4,096 kytes 
(4K) called pages. These pages may reside 
in external page storage (the portion of 
auxiliary storage used to store pages), in 
real storage, or both. The pages are 
transferred into and out of real storage as 
needed by the system or the users‘ fpro- 
grams. This process is called paging. 


When a program refers to a virtual 
address, that virtual address is translated 
ky relocation hardware into its correspond- 
ing real storage address. If the page con- 
taining that virtual address is not in real 
storage, the CPU generates a page transla- 
tion exception (a missing page interrup- 
tion). This interruption notifies the 
supervisor to Ering in the needed page from 
external page storage. The process of 
kringing a page into real storage is called 
a page-in. The entire virtual address 
translation and paging process are trans- 
parent to the problem program, allowing the 
programmer to use the virtual address space 
as though it were real storage. 


When a page is no longer needed in real 
storage, it is moved to external page 
storage to make real storage available for 
another page. This process is called a 
page-out. The page is moved to external 
page storage only if it has been changed; 
otherwise, it is merely overlaid when a new 
page is read into storage. 


TRANSLATION OF VIRTUAL ADDRESSES 


As the CPU executes instructions, the 
system uses dynamic address translation, a 
System/370 hardware feature, to translate 
each virtual address into its real storage 
equivalent. If the virtual address does 
not have a real storage equivalent (that 
is, if the page containing the address is 
not in real storage), the CPU generates an 
interruption notifying the supervisor that 
a page must be brought from external page 
storage into real storage. Translation 
occurs only when virtual storage is 
addressed ky the CPU. The entire process 
is automatic. Storage references by chan- 
nels for I/O operations are not subject to 
the translation process. 
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To facilitate address translation, vir- 
tual storage is logically divided in 64K 
blocks called segments. There are 256 such 
segments. Each segment is divided into 
Sixteen 4K blocks called pages. This 
organization enables the dynamic address 
translation feature to use a two-level 
table-lookup process to determine the real 
Storage address. 


The first-level table used for address 
translation is the segment table. It con- 
tains an entry for each 64K segment of vir- 
tual storage. Each segment table entry 
points to a page table, which is the 
second-level table used for address trans- 
lation. Each page table contains 16 
entries, one for each 4K page in the seg- 
ment. The page takle entry contains the 
address of the page in real storage (the 
first 12 bits of the final translated 
address). Because each page must reside on 
a 4K boundary, the last 12 bits of the page 
address are always zero. 


VIRTUAL ADDRESS 


Figure 1-1 shows the translation of a 
sample virtual address. The virtual 
address is divided into three parts: the 
segment number, the page number, and the 
in-page displacement (number of bytes the 
address is displaced from the beginning of 
the page). The dynamic address translation 
feature translates each virtual address as 
the CPU executes instructions. To begin 
the process, the translation feature 
obtains the origin of the segment table 
(xxx000 in the example) from a control 
register called the segment table origin 
register (step 1 in Figure 1-1). This con- 
trol register is initialized by the nucleus 
initialization program, which builds the 
segment table. The translation feature 
then uses the segment number (X'DE' in the 
example) of the virtual address to deter- 
Mine the entry in the segment table for the 
segment in which that virtual address 
resides. 


The segment table entry (at location 
x¥xx378 in the example) points to a page 


Segment Page Displacement 
Number Number Within Page 
0 78 15 16 ! 19 20 3] 
Uapeee e8 
C | 
| ES A a reap cee Pe 


Segment Table | 
Origin Register Q) 


Real Storage 
Address of 
Segment Table 


DETERMINE SEGMENT 
TABLE ENTRY ADDRESS 


Multiply the segment 
number by 4 to account 
for width of the segment 


table: 

4 x DE = 378 (hex) 
Add the result to the 
segment table origin 
address to obtain the 
segment table entry for 
this virtual address . 





Segment Table 


xxx000 OOF BOO 
Page Table Origin 
xxx378 ' ‘ OOF B18 
OOF BOO 


0 78 3] 
Address of page table for 


this virtual address 





Legend 
— — —g Indicates use of portions of the virtual address. 





eu Indicates the flow of address translation. 


Figure i-1. 








DETERMINE PAGE TABLE 
ENTRY ADDRESS 


CREATE REAL STORAGE 
ADDRESS 


Append the 12-bit 
displacement of the 
virtual address to the first 
12 bits of the real storage 
address to complete the 
address translation. 


Multiply the page number 
by 2 to account for width 
of the page table: 


| 

| 
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| 

2x C= 18 (hex) | 

Add the result to the page 
table origin address to 

obtain the address of the | 
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virtual address. 


Page Table 
Ld 7 


0 1112 15 0 78 19 20 31 
First 12 bits are the real 
storage address of the 
page containing the 


REAL STORAGE ADDRESS 


virtual address being 
translated 


Translation of a virtual address into a real address. 
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table (at location OOFBOO in the example). 
The page table contains 16 entries, one for 
each page in the segment. The translation 
feature uses the page number (X'C‘ in the 
example) of the virtual address to deter- 
mine which page in the segment contains the 
Virtual address (step 2). This number is 
used to calculate the address of the page 
table entry for that page (X‘'OOFB18‘ in the 
example). The page table entry contains 
the real storage address for that page (the 
first 12 bits of the desired real storage 
address). As mentioned earlier, a page, 
when in real storage, must reside on a 4K 
boundary. Thus, the last 12 bits of the 
real storage address for a page are zeros. 


The in-page displacement portion of the 
virtual address (X‘'246" in the example) is 
appended to the 12-bit address in the page 
table entry to obtain the desired real 
storage address (step 3). The CPU then 
uses the real storage address as it 
executes instructions. 


If the page table entry is flagged inva- 
lid, the CPU generates a page translation 
exception. The page translation exception 
is a program interruption (code X‘'11‘') and 
indicates that the page containing the vir- 
tual address is not in real storage. This 
interruption (also called a missing page 
interruption) indicates that the page must 
be transferred from external page storage 
to real storage. 


If the segment takle entry is marked 
invalid, the CPU generates a segment trans- 
lation exception. This exception is a pro- 
gram interruption (code X‘'10') and indi- 
cates that: (1) no page table has been 
created for the segment, or (2) the virtual 
address being translated is protected from 
the task referencing it (see “Storage Pro- 
tection" later in this section). 


If, during the translation process, the 
dynamic address translation feature cannot 
locate the segment table, the segment table 
entry, or the page table, the CPU generates 
a translation specification error. The 
translation specification error is a pro- 
gram interruption (code X'12'). It indi- 
cates that a control program or hardware 
failure has prevented translation of the 
virtual address. See Diagram 1.1 to see 
how missing page page interruptions, seg- 
ment translation errors, and translation 
specification errors are processed. 


PAGING 


In the VS2 system, a program normally 
executes with only some of its pages in 


real storage. The specific pages needed at 
any given time depend upon the structure 
and addressing pattern of the program. 

When a page is needed, it is brought into 
real storage. When no longer needed, it is 
released or transferred to external page 
storage. As mentioned earlier, this 
transfer of pages between real storage and 
external storage is called paging. 


As an instruction is executed, the vir- 
tual addresses are translated as explained 
in the preceding suksection, “Translation 
of Virtual Addresses". If a virtual 
address that is keing translated resides in 
a page not in real storage, the CPU 
generates a missing page interruption. 

This interruption notifies the paging 
supervisor, a set of paging routines in the 
VS2 supervisor, that a page must be brought 
into real storage (paged in). 


When real storage is needed for a page 
being paged in, the real storage is made 
availakle ky the paging supervisor. The 
paging supervisor selects what it deter- 
Wines to be the least needed page and makes 
the real storage it occupies available for 
the page-in. If the selected page in real 
storage was modified during execution, it 
is actually written out to external fage 
storage (paged out). (The hardware main- 
tains a bit in the storage key that indi- 
cates whether the contents of a page frame 
have been changed.) If the page was not 
modified and an exact copy of the page 
already exists on external page storage, 
the page is not written out; it is merely 
overlaid by the incoming fage. 


The paging supervisor maintains three 
sets of takles to keep track of all pages. 
The first two sets of tables, the segment 
takles and the page tables, are used for 
dynamic address translation. The paging 
supervisor uses a third table, the external 
page table, to keep track of all pages on 
external page storage. For every rage 
table entry there is a corresponding 
external page table entry which contains 
the external page storage address at which 
that page is recorded on a paging device. 


The VS2 supervisor does not maintain an 
image of virtual storage. The pages of 
virtual storage are actually in real 
storage, on external storage, or both. 
They are not stored in ccntiguous locations 
or in any sequential order. They are 
placed in real storage wherever a page 
frame is available; they are stored on 
external page storage wherever a page slot 
is available. The three sets of tables, 
which are organized according to page 
addresses, record the physical location of 
each page. 
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The paging supervisor maintains a list of available page 
frames that are least likely to be referenced. Whena 
page frame is needed so that a page can be brought into 
real storage, the paging supervisor uses one of these 
available frames. When the number of available frames 
falls below a value specified during nucleus initialization, 
the paging routines select the page frames containing the 
least-used pages and make them available for use. The 
paging routines use the page replacement algorithm to select 
the least-used pages, and the process is based on the 
settings of the change and reference bits in the storage keys 
associated with each page frame. 


Entry for 
Page | 
Page 2 
Page 3 
Page 4 
Page 5 


The selection of page frames continues until the Page 6 
predetermined number of available page frame is reached. 
During the process, page frames that contain unreferenced 
pages are selected before page frames that contain 
referenced pages. Page frames that contain unchanged Page 8 
pages are selected before page frames that contain changed 
pages. 


Page 7 


If the page in a selected frame has been changed, a copy of the 
changed page is actually moved to external page storage before the 
page frame is made available. If the page in a selected page frame 
has not been changed, a copy is not moved to external page storage, 
and no page-out is required. 


In this illustration, the page frames occupied by Page 8 and Page 
4 have been made available. The page table entries for these pages 
have been marked invalid. Since Page 8 was not changed, there is 
no need to move it to external page storage and the external storage 
address remains the same. Page 4, however, has been changed. 
Therefore, a copy of it is paged out to an available external page 
storage slot. The external page table entry is updated for Page 4 and 
the external storage slot formerly occupied by Page 4 (called "Old 
Page 4" in this illustration) is now available for use when another 
page-out is necessary. Note that pages are not necessarily transferred 
to external page storage sequentially. 


Figure 1-2. 


Figures 1-2 and 1-3 illustrate the pag- 
ing process uSing a virtual storage of 
eight pages and a real storage of 24K bytes 
(a real storage large enough for six 
pages). Real storage is logically divided 
into 4K blocks called page frames, and each 
page frame is on a 4K boundary. In the 
example, real storage consists of six page 
frames. For purposes of this illustration, 
the pages are numbered. In the VS2 system, 
the pages are identified by their page 
addresses. 


ORGANIZATION OF VIRTUAL STORAGE 


In its simplest form, virtual storage 
consists of nothing but address space -- 
the total 16,277,216 addressable bytes in 
the system. More concretely, virtual 
storage consists of pages fixed in real 
storage, pages stored on the paging 
devices, and various parameters and control 
information in the supervisor. 


It is the parameters and control infor- 
mation that give form and organization to 
what otherwise seems to be an amorphous 
thing called virtual storage. 


Real Storage Address 


Real Storage Address 
Real Storage Address 


*Marked invalid 








PAGE TABLE 


Real Storage Address 
Real Storage Address 


Real Storage Address 


EXTERNAL PAGE TABLE 


EXTERNAL PAGE STORAGE 


REAL STORAGE PAGE FRAMES 


eee ee 
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Page 7 


Page 5 


Page 8 Page 6 


After Page-Out 


Explanation of page-out operations. 


The system must reserve certain fortions 
of the total address space for specific 
purposes (for example, space must be 
reserved for the system nucleus, for the 
fixed link pack area modules and BLDL 
entries, and for a minimum system gueue 
area in which to build system control 
blocks). 


The supervisor must also know how much 
address space can be used for other rpur- 
poses, such as how much space can be allo- 
cated to nonpageable (V=R) tasks and how 
truch to pageable (V=V) tasks. 


And, while the system is running, the 
supervisor must keep track of how much 
storage is being used for the different 
purposes, and it must ensure that the 
limits on the different areas are not 
exceeded. 


For these reasons, the supervisor 
divides the virtual address space into dis- 
tinct sections. Each section is reserved 
for a particular purpose, and whenever 
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When an executing program refers to a virtual 
address that is not in real storage, the virtual 
address cannot be translated to a real address, and 
a missing page interruption is generated. Control 
is given to the paging supervisor. The paging 
supervisor first attempts to reclaim the page. If 
the needed page occupies a page frame that has 
been made available for a page-in but that page 
frame has not yet been re-used, the page is 
reclaimed and a page-in is avoided. The paging 
supervisor merely updates the page table entry for 
the reclaimed page, and removes the page frame 
from the available list (called the available page 
queue). Page 4, for example, could be reclaimed. 


Entry for 
Page | 


Page 2 


Page 3 


* 


Page 4 


* 


Page 5 
Page 6 


Page 7 

In this illustration, the executing program has 
referred to a virtual address in Page 3. Since Page 
3 was not in real storage (see Figure 1-2), a copy 
of that page was paged into the page frame 
formerly occupied by Page 8. The page table 
entry for Page 3 was updated so that it now contains 
the real storage address of the page frame now 
occupied by Page 3. The needed page is now in 
real storage and when the interrupted program 
regains control, it can continue executing. 


* 


Page 8 


The first time a page is referred to, a page-in 
is not required. There is no associated page on 
external page storage. The paging supervisor 
merely allocates an available page and optionally, 
clears it. 





Storage is requested for that purpose, the 
Storage is allocated from the section of 
virtual address space reserved for that 
purpose. The size of each section is esta- 
blished during nucleus initialization and 
is based on parameters received by the sys- 
tem at that time. 


The space for one section may exist tot- 
ally in real storage (as it does for the 
system nucleus), or it may be a combination 
of real storage space and pages on paging 
devices (as it does for a pageable task). 
Thus, some sections are fixed in real 
storage and other sections are paged. 


Figure 1-4 illustrates the organization 
of virtual storage. Keep in mind that the 
illustration depicts the way in which vir- 
tual storage looks when all the pages are 
laid out sequentially. The VS2 supervisor 
keeps no such image. To construct this 
image after the system is in operation, you 
would have to sort through, combine, and 
order the pages in real storage and extern- 
al storage using the page tables and other 
control information as a guide. 


The SQA (system queue area) is reserved 
for non-job-oriented and non-job-step- 


REAL STORAGE PAGE FRAMES 


PAGE TABLE 


EXTERNAL PAGE TABLE 


Real Storage Address 
Real Storage Address 
New Real Storage Address 


Real Storage Address 


Real Storage Address 


Real Storage Address 
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EXTERNAL PAGE STORAGE 


Page 2 Page 7 


Page 3 Page 6 


Page 7 


Page | Page 4 


Page | Page 5 


Page 8 Page 6 


After Page-In 


r e Figure 1-3. Explanation of page-in operations. 


oriented control blocks and tables (such as 
the segment takles) that are maintained by 
the control program. It is reserved in 
segment multiples. As long as an SQA page 
is allocated for use, it is nonpageakle and 
is usually fixed in the high end of real 
Storage. The number of SQA pages fixed in 
real storage increases and decreases to 
Meet the needs of the systen. 


The pageable LPA (pageable link pack 


area) contains selected reenterable rour- 


tines that can be used concurrently ry all 
tasks in the system. It is pageable and 
the fixed link pack area is an extension of 
this area (see below). 


The pageable BLDL table contains the 
list of directory entries for the SYS1. 
LINKLIB data set. The pageable BLDLI table 
can exist only if the user does not specify 
a fixed BLDL table. 


The master scheduler region is used by 
the master scheduler task and the communi- 


cations task. 
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VIRTUAL STORAGE 
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System Queue Area 
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(for nonpageable regions) 


Fixed BLDL Table 


Fixed Link Pack Area 
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*These sections are mutually exclusive. 





Figure 1-4. Organization of virtual 


storage. 


The master scheduler LSQA is the local 


System queue area for the master scheduler. 
(The local system queue area is explained 
below. ) 


The dynamic area is used for execution 
of user and system tasks. The area is 
divided into two parts; the part below the 
V=R LIMIT is used for nonpageable regions 
and the area above the line is used for 
pageable regions. Regions for nonpageable 
(V=R) tasks are allocated from the lower 
part, and regions for pageable (V=V) tasks 
are allocated from the upper part. 


An LSQA (local system queue area) is 
reserved for each initiator, in the high 


end of the dynamic area. It is allocated 
in segment multiples. Each LSQA is used to 
store job-oriented or job-step-oriented 
control blocks, including the queues of 
control blocks that contain the information 
necessary to keep track of the free and 
allocated space within the region. The 
LSQA aliso contains the page tables and the 
external page tables for the region. Pages 
allocated in each LSQA are fixed in real 
Storage and their number increases and 
decreases to meet the needs of the job or 
job step. 


At system initialization, the user can 
set the V=R limit by specifying the size of 
the dynamic area to be reserved for non- 
pageable (V=R) regions. Problem programs 
that cannot be paged during execution must 
occupy V=R regions. These regions are 
allocated pages below the V=R limit. The 
virtual addresses of these pages have real 


storage equivalents. The region is fixed 
in real storage at these identical real 
storage addresses, thus ensuring that a 
missing page interruption never occurs and 
that a virtual address in that region is 
identical to the real storage address after 
translation. Pages for V=V regions are 
allocated from the dynamic area above the 
V=R limit. 


The fixed BLDL table is a BLDL tattle 
that the user has specified to be fixed in 
real storage. It is nonpageable and the 
virtual and real storage addresses are 
identical. A system contains either a 
fixed BLDL table or a pageable BLDL takle, 
rut not both. 


The fixed LPA (fixed link pack area) is 
present only if the operator specifies it 


at IPL time. It is an extension of the 
pageable link pack area and iS searched 
first (that is, Lkefore the pageable link 
pack area). It is not pageable and its 
virtual and real storage addresses are 
identical. 


The system nucleus contains the control 
fFrogram routines that must be permanently 
fixed in real storage. The nucleus is not 
paged and begins at virtual address zero. 
Its virtual and real addresses are 
identical. 


USE OF REAL STORAGE 


Figure 1-5 shows the organization of 
real storage. Page frames in the fixed 
area contain the system nucleus, the fixed 
link pack area, and the fixed BLDL table. 
The real storage addresses of the page 
frames and the virtual addresses of the 
pages are identical. The pages are not 
paged out of real storage, the page frames 
are not é€ligible for use by other rages, 
and copies of the pages are not kept on 
external page storage. 













High | Page frames available for: 

e SQA and LSQA pages (which are fixed 
in real storage) 

e Pageable link pack area and BLDL table 
pages 

e Pageable (V=V) regions 


Real storage available 
for paging 






Page frames eligible for nonpageable (V=R) 
regions (Can be used for pageable items 
when all frames are not occupied by 
nonpageable tasks) 


Fixed BLDL Table 
Fixed Link Pack Area 


System Nucleus 


— —— VER Limit 










Permanently fixed 
area of real storage 
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Figure 1-5. Organization of real storage. 
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All page frames in the rest of real 
storage are eligible for paging. However, 
pages allocated for the SQA (system queue 
area) or an LSQA (local system queue area) 
must reside in real storage until they are 
no longer needed. Thus, page frames con- 
taining SQA or LSQA pages are not eligible 
for paging until those pages are freed. 
Copies of SQA and LSQA pages are not kept 
in external page storage (except LSQA pages 
for TSO regions). 


Pages for all pageable programs can use 
the page frames in the pageable area. 
These pages are paged out of real storage, 
the page frames are eligible for use by 
other pages, and copies of the pages are 
kept in external page storage. The virtual 
addresses and the real storage addresses 
are probably different. 


The V=R limit established for virtual 
storage also applies to real storage. If 
the user requests a V=R region for a non- 
pageable task, the pages for that region 
reside in the page frames below the V=R 
limit. The pages of the nonpageable pro- 
gram occupy the page frames whose addresses 
are the same as the virtual addresses of 
the pages that they contain. The virtual 
and the real addresses are identical. The 
pages are not paged out of real storage, 
the page frames are not eligible for use by 
other pages until the V=R region is freed, 
and copies of the pages are not kept on 
external page storage. When page frames 
below the V=R limit are not being used for 
V=R regions, they are eligible for use by 
other pages. However, if a page that does 
not belong to a V=R region must be long- 
fixed in real storage, the supervisor 
attempts to place that page in a page frame 
above the V=R limit. In so doing, the 
supervisor avoids page-frame allocation 
that inhibits allocation of V=R regions. 


STORAGE PROTECTION 


Storage protection is a feature that 
prevents unauthorized access to virtual 
Storage by all except the intended users. 
The larger addressable storage of the VS2 
System allows users to start more than 15 
regions, and consequently, storage protec- 
tion has been extended to cover the addi- 
tional number of regions. The VS2 system 
still uses the 16 standard protection keys. 
It supplements this key protection with a 
segment validation process. 


Key-0O programs have access to all allo- 
cated areas Of virtual storage. Non-kKey-0 
programs have read-only access to the 
Shared areas of the system (for example, 
the system nucleus, the SQA segments, and 
LSQA segments) and full access to their own 
regions. 


System programs (such as the supervisor 
or data management routines) are assigned 
protection key 0. Nonpageable programs are 
asSigned protection keys 2 through 15. 
(Thus the user can run a maximum of 14 non- 
pageakle programs at any one time.) All 
pageable programs are assigned protection 
key 1. If a pageakle or nonpageable user 
program attempts to reference fetch- 
protected or non-key-0 virtual storage 
asSigned to another nonpageable program, 
the system generates a storage protection 
interruption. The protection keys prevent 
nonpageable programs from referencing the 
non-key-0 areas of all pageable programs 
and other nonpageable prcegrams. They also 
protect all pageable programs from all non- 
pageable programs. 


Since all pageable programs are assigned 
Frotection key 1, the VS2 system uses a 
segment validation process to protect these 
Erograms from each other. Two segment 
tables are used: one for all system and 
nonpageakle programs and a second for all 
non-key-0 pageable programs. Both segment 
tables point to the same set of page 
tables. Each segment of virtual storage 
allocated to a program is represented by a 
segment table entry in a segment table. 

All segments allocated to pageable programs 
are represented by segment table entries in 
the second segment table. 


Whenever a pageable program is dis- 
patched, the dispatcher marks as valid all 
segment takle entries for that program's 
region. All other segment table entries 
for nonshared areas are marked invalid. 
Whenever a pageable program attempts to 
address virtual storage in a segment whose 
segment table entry is marked invalid, the 
system generates a segment translation 
error during virtual address translation. 
The system treats a segment translation 
error as though it were a storage protec- 
tion check. This process protects pageable 
programs from each other. 


Nonpageable programs cannot be totally 
isolated. Since key-0O areas are not fetch- 
protected and since nonpageable programs 
use the system segment table, nonpageable 
programs can reference key-0O areas in other 
regions, including pageable regions. 


INTERRUPTION HANDLING 


All supervisor activity begins with an 
interruption. In an IBM System/370, the 
interruption is a machine characteristic; 
it is the means by which the supervisor 
gets control of the CPU to provide 
resources for the performance of tasks. An 
interruption may be planned (specifically 
requested in the program currently being 
executed by the CPU) or unplanned (caused 
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by an event that may be either related or 
unrelated to the task currently being 
performed). 


There are five types of interruptions: 


e Supervisor call (SVC) interruption: a 
request for a particular supervisor 


service. 


e Timer/external interruption: an atten- 
tion signal from the System/370 clock 


comparator or CPU timer, the ccnsole 
interruption key, or the direct control 
feature. 


e Input/output interruption: the signal 
that an input/output event has 


occurrred. 


e Program interruption: a signal that a 
program has attempted an invalid 


action, has met an exception condition 
during dynamic address translation, has 
executed an SSM (set system mask) 
instruction, or is having interruptions 
monitored by the dynamic support system 
(DSS). 


e Machine-check interruption: the signal 
that a machine error has occurred. See 


the OS/VS Recovery Management Support 
Logic manual for details. 


Overall operation of the supervisor is 
shown in Figure 1-6. 


The program being executed in the per- 
formance of task A has been interrupted, 
possibly because it contained a request for 
a supervisor service, possibly because an 
input/output operation has been completed 
for an entirely different task. 


The interruption-handling portion of the 
Supervisor (represented by the top box in 
Figure 1-6) analyzes the interruption, 
based on control information passed to it 
at the time of the interruption. Each of 
the five interruption types has associated 
with it two program status words (PSWs) 
called “old" PSW and "new" PSW. The old 
PSW contains the information needed by the 
supervisor to analyze the interruption. 
The new PSW contains the address of the 
appropriate interruption~-handling routine. 


When an interruption occurs, the CPU 
Stores the contents of the current PSW in 
the old PSW for that type of interruption, 
and loads the new PSW. By loading the new 
PSW, the CPU places itself in supervisor 
state and passes control to the associated 
interruption-handling portion of the super- 
visor. The supervisor then passes control 
to those parts of the control program that 
perform the services required as a result 
of the interruption. For a more detailed 
introduction to interruption handling, see 
Section 2 and Diagram 1.1. 
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Interruption Handling 


Machine 


loads new ff 


PSW Analyze the interruption. 
Determine the required control 


program action, 
Route control to appropriate 
part of control program. 





Program Being 
Executed for Task A 



















Se Any . Performing the Service 
Interruption 


Supervise use of real storage. 

e Establish, alter, or end a task. 

@ Establish linkage to a program in 
virtual storage or on auxiliary 
storage. 

e Allocate or free virtual storage. 

e Supervise use of the clock 
comparator and the CPU timer. 

e Handle console communications. 

e Supervise input/output operations. 

@ Provide system environment 

recording and/or attempted 

recovery. 

Serialize the use of resources. 





Program Being 
Executed for Task B 





: Some of these services may 
require another service, and 
may thus cause the supervisor 

cycle to be restarted with 
another interruption. 











Process requests for asynchronous 
exits. 

e Determine which ready task has 
the highest priority. 

@ Route control to a routine that is 

to be executed for that task. 


Load old 


PSW . 
Note: The dispatcher may determine 


that the interrupted task 
should be resumed, or that a 
different task should be 
dispatched. 


Figure 1-6. General flow of the supervisor. 


SUPERVISOR SERVICES 


The supervisor itself performs many of 
the services that are requested through an 
interruption (these services are repre- 
sented by the middle box in Figure 1-6). 
Services that the supervisor provides may 
ke grouped into these general categories: 


e Task supervision. The task suprervision 
routines create a task in response to a 
request to attach a subtask to an 
already existing task. The routines 
determine in what order tasks are to be 
executed. Task supervision routines 








C 


also perform the exiting procedures that 
prepare for the return of control from a 
completed program. 


e Contents supervision. The contents 
supervision routines keep records of 


all programs in virtual storage, and 
schedule the execution of these pro- 
grams for tasks. The Program Fetch 
routine brings requested programs into 
virtual storage from auxiliary storage. 


e Paging supervision. The paging super- 
vision routines manage real storage and 
external page storage. They ensure 
that pages are brought into real 
storage when needed. 


e Virtual storage supervision. The vir- 
tual storage supervision routines 


assign virtual storage needed to per- 
form job steps and tasks within job 
steps. 


e Timer supervision. The timer supervi- 
sion routines control the use of the 
System/370 clock comparator and CPU 
timer. 


e Task termination. The termination rou- 
tines perform normal and abnormal ter- 
Mination of tasks. 


Most supervisor services are requested 
by issuing a macro instruction. The last 
machine instruction of the resulting macro 
expansion is an SVC instruction. When 
executed, the SVC instruction causes an SVC 
interruption. Control passes to the SVC 
interruption handlers which, in turn, pass 
control to the routine that performs the 
requested service. Diagrams 1.1 through 
1.3 illustrate SVC processing. 


Most SVC routines are executed in a dis- 
abled state; that is, they cannot be inter- 
rupted by I/O or external events during 
processing. To avoid missing page inter- 
ruptions while disabled, these SVC routines 
have special prologues (preliminary rou- 
tines) to ensure that all pages needed dur- 
ing their processing are in real storage 
before disabled processing begins. These 
SVC prologues use the MODESET service of 
task supervision to enable interruptions. 
They then reference all needed virtual 
addresses. This referencing causes all the 
pages in which those virtual addresses 
reside to be paged into real storage by 
paging supervision. The SVC prologue then 
issues a MODESET SVC to disable interrup- 
tions. The disabled SVC routine can then 
process the service request without incur- 
ring a missing page interruption. 


After a control program service has been 
performed, the supervisor determines which 
task is to be performed next. The dis- 


patcher (a task supervision routine repre- 
sented by the bottom block in Figure 1-6) 
returns control to a processing program or 
another supervisor routine. As seen in 
Figure 1-6, the program to which control 
passes need not be the one that was inter- 
rupted. The dispatcher may determine that 
as a result of the interruption, task B, 
which has a higher priority than task A, 
should ke performed next. 


Each major category of supervisor pro- 
cessing is described more fully in the fol- 
lowing subsections. 


Task Supervision 


Each task to ke performed by the system 
is represented by a TCB (task control 
bklock). The TCB contains control and sta- 
tus information related to the task, and 
pointers to system resources assigned to 
the task. 


When the operating system is generated, 
Six key TCBs are built into the system. 
These TCBsS represent the paging task, the 
system error task, the dynamic suprort sys- 
tem task, the communications task, the 
dynamic device reconfiguration task, and 
the master scheduler task of job manage- 
ment. All other task control blocks are 
constructed ky the supervisor ATTACH rou- 
tine, at the request of either the control 
program or a user program. The master 
scheduler can attach initiator/terminator 
tasks. Initiator/terminator routines 
attach job-step tasks and subtasks. An 
entire tree structure of related tasks may 
thus be formed. 


All TCBs in the system are chained 
together, according to dispatching priori- 
ty, to form the task queue. The paging TCB 
is at the top of the queue, followed in 
order ky the system error TCB, the dynamic 
support system TCB, the communications TCB, 
and the master scheduler TCB. The dis- 
patching priorities of other tasks are 
assigned by the supervisor according to the 
parameters given in the ATTACH macro 
instructions. When several TCEs with the 
same priority appear in the TCB queue, they 
are arranged on the queue in descending 
order in the sequence in which they were 
created (that is, the first TCB created at 
that priority is the highest, the second 
TCB created is the next lower on the queue, 
and so on). 


Figure 1-7 shows the flow of control 
that results from issuance of the ATTACH 
macro instruction. This flow is typical of 
the processing that follows most supervisor 
macro instructions. 
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Program Performing 
Task A 


SVC Interruption 
Handler 


Branch to ATTACH 
Routine 


ATTACH Routine 





ATTACH Task B 










Branch to 

GETMAIN Routines 

ee | GETMAIN 
Routines 


Branch to 
Dispatcher 






Program That 
Performs the New 
Task B 


Dispatcher 


Return to 
Caller 


Load PSW to Program 
That Performs Highest- 
Priority Ready Task 


Flow of control after the 
ATTACH macro instruction is 
issued. (Shows typical pro- 
cessing for a supervisor macro 
instruction.) 


The ATTACH routine, like other SVC rou- 
tines, is entered as a result of an SVC 
interruption. The SVC interruption- 
handling routines analyze the interruption, 
determine which service is required, and 
then branch to the ATTACH routine. The 
ATTACH routine obtains virtual storage for 
a TCB by branching to the GETMAIN routine. 
When the required storage has been allo- 
cated, the ATTACH routine regains control. 
It initializes certain fields in the TCB 
and places it on the task queue. 


After the ATTACH routine has initialized 
the TCB that represents the new task, it 
branches to the dispatcher. The dispatcher 
examines the task queue to find the 
highest-priority task that is ready to be 
performed. This task may or may not be the 
one that was being performed at the time 
the original SVC interruption occurred. 

For example, if task B has been attached as 
a subtask of task A, and if B has a higher 
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dispatching priority than A, then task B 
will be performed before task A is resumed. 


The supervisor controls the order in 
which tasks are performed. This control is 
accomplished by the dispatcher, working 
through the task queve. The task queue 
serves as a record of the status of every 
task in the system. The highest-priority 
task represented on the task queue may not 
ke the one to ke dispatched; it may be 
waiting for some event (through the WAIT 
Macro instruction, for example) or for a 
resource that has been serialized (through 
the ENQ macro instruction). To be dis- 
patched, a task must be the highest- 
Friority ready task on the queue (that is, 
the highest-priority task that is currently 
ready to begin processing). 


The time-slicing feature is included in 
the system, and the dispatcher contains 
code to perform time-slicing. The dis- 
patcher controls time-slicing through the 
TSCE (time-slice control element); there is 
one TSCE, assembled at system generation, 
for each time-slice group. 


The user can also identify a single 
priority level as an APG (automatic fpriori- 
ty group) at system generation or system 
initialization. However, a time-slicing 
group cannot be identified as an automatic 
priority group. The dispatcher dispatches 
tasks within the automatic priority group 
according to a special algorithm that 
attempts to provide optimum use of CPU and 
I/O resources by these tasks. For more 
information on automatic priority groups, 
see "Automatic Priority Grouping” under 
“Special Features" in this section. 


Task supervision also provides routines 
that prepare for the return of control from 
a completed program and perform the actual 
return of control. Control may return toa 
Mainline program or to a supervisor rou- 
tine. The exiting procedures determine the 
type of program that has completed its 
execution, and perform different clean-up 
operations according to the type of 
program. 


The dispatcher is usually entered to 
return control to a program belonging to 
the highest-priority ready task. There are 
some cases, however, in which the dispatch- 
er is not entered to return control: for 
instance, when the completed program is a 
type-1 SVC routine that has not indicated 
the need for a task switch. 


For a more detailed introduction to task 
supervision, see Section 3. 


J 





J 





c 


C 


Program A TCB 





——__—__—___—- Request Block 
LINK Program B 








Program B 
RETURN 


Request Block 


Program A 


(2) Contents supervision 
routines construct a 
new RB to represent 
Program B's level of 
control. 


Program A issues 
a LINK macro 
instruction 
specifying 
Program B. 


(3) When Program B 
completes processing, 
control passes back to 
Program A. 


Figure 1-8. Use of the RB queue in passing 


control to different programs. 


Contents Supervision 


Contents supervision is accomplished 
through a structure of queues that are very 
closely related to the task queue. These 
are the request block queues. 


Request blocks (RBS) represent levels of 
control within a task. Contents supervi- 
Sion routines construct an RB for the first 
level of control in a new task (the first 
program to be executed for a task): this 
RB and RBs for subsequent levels are 
chained on the TCB"'s RB gueue. The 
subsequent-level programs are programs that 
are called by higher-level programs and 
must be executed before the higher-level 
programs can ke completed. Figure 1-8 
illustrates the process. If program A 
issues a LINK macro instruction specifying 
program B, contents supervision routines 
construct a new RB to represent program B's 
level of control. The supervisor uses the 
RB queue as a record of control levels. As 
new programs are called, the supervisor can 
pass control to the succeeding levels and, 
as the routines complete their operation, 
it can pass control back up the line, 
regardless of the number of times a task is 
interrupted. 


There are five types of RBs: 


e IRBs (interruption reguest blocks), 
which control routines that must be 


executed in the event of asynchronous 
interruptions or events. IRBs are 


created in advance of an interruftion 
ky the CIRB routine at the user's requ- 
est, but are not placed on an RB queue 
until an interruption or event actually 
cccurs. 


e PRBS (program request blocks), which 
represent nonsupervisory routines that 


must be executed in the performance of 
a task. PRBS are created by the con- 
tents supervision routines that perform 
the ATTACH, LINK, SYNCH, and XCTL 
functions. 


e SVRBS (supervisor request blocks), 
which represent supervisor routines. 


SVRBs are created by the SVC 
interruption-handling routines. They 
are queued in the same way as PRBs. 


e SIRB (system interruption request 
block), which is used only for the sys- 


tem error task. There is only one SIRB 
in the system. 


e TIRBs (task interruption request 
blocks), which represent control fro- 


gram services that must be performed 
asynchronously. The ATTACH routine 
creates one TIRB for each task. 


Contents supervision routines construct 
only one type of RB: the PRB. 


The supervisor maintains a record of all 
programs in virtual storage -- their attri- 
tutes, locations, and use statuses. This 
record is called the contents directory. 
The contents directory is made up of four 
items: (1) the LPD (link pack area direc- 
tory); (2) the LPAQ (link pack area queue); 
(3) the JPAQ (job pack area queue); and (4) 
the load list. Figure 1-9 illustrates the 
queuing structure of the contents 
directory. 


The LPD is a record of every program in 
the pageakle link pack area. The link pack 
area contains reenterable routines sfeci- 
fied by the control program or by the user. 
It is loaded by the nucleus initialization 
Frogram from the SYS1.LPALIB data set. The 
programs in the link pack area can he used 
repeatedly by any task in the system. 


The entries in the LPD are LPDEs (link 
pack directory entries). The LPD resides 
in the link pack area and is pageatle. 


The LPAQ is a record of every program in 
the link pack area that is presently in 
use. The entries in the LPAQ are CDEs 
(contents directory entries). When a pro- 
gram represented in the LPAQ is requested 
for a task, it will normally be represented 
in the task's RB queue by a PRB; the 
address of this PRB will be inserted in the 
CDE. The LPAQ resides in the system queue 
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area and is not paged. Whenever a link 
pack program is requested for use, the LPDE 
for that program is used to create a CDE 
which is placed on the LPAQ. The CDE is 
deleted from the LPAQ when the program is 
no lcnger needed. The LPAQ reduces the 
amount of paging necessary to locate a link 
fack program. 


The load lists represent programs that 
tasks in regions have requested by issuing 
LOAD macro instructions. Each requested 
program was either found in the link pack 
area or was loaded into the job pack area 
in virtual storage. The entries in the 
load list are LLEs (load list elements), 
not CDEs. Each load list element is asso- 
ciated with a CDE in the JPAQ or LPAQ; the 
programs represented in the load list are 
thus also represented in one of the other 
queues. 


There is a JPAQ for each job ster in 
which the LOAD macro instruction has been 
used to load programs into the job rack 
area. The JPAQ, like the LPAQ, is made up 
of CDEs. The JPAQ is used to record the 
locations of and control the use of rou- 
tines in the job pack area. These routines 
can ke either reenterable or not reenter- 
able, and they are normally used more than 
cnce by routines in the job step. The JPAQ 
resides in the local system queue area for 
the jok-step region and is not paged. 


For a more detailed introduction to con- 
tents supervision, see Section 4. 


Paging Supervision 


Paging supervision routines manage the 
exchange of pages between real storage and 
external page storage (see "Paging" under 
"Basic Concepts of Virtual Storage" earlier 
in this section). The entire paging pro- 
cess is transparent to the problem program. 


To make the most efficient use of real 
storage and minimize the amount of CPU time 
used for paging, the paging supervision 
routines use two algorithms: the page 
replacement algorithm and the task disable- 
ment algorithm. The page replacement 
algorithm is used to find and release 
least-used pages in real storage when page 
frames must be made available for other, 
more needed, pages. The task disablement 
algorithm is used to determine whether 
excessive paging is being done. If the 
rate of paging is excessive, one of the 
lower-priority active tasks is set nondis- 
patchable to lessen the contention for real 
storage. When the paging rate has returned 
to a more normal level, the tasks are set 
dispatchable again. 
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If a missing page interruption can be 
satisfied by reclaiming the page in real 
Storage, it is. However, if further pro- 
cessing is required before the needed page 
can be paged in, paging supervision rou- 
tines construct a PCB (page control block). 
This PCB represents the paging request and 
records the status of the needed page. It 
is queued to one of ten PCB queves. Eight 
of the queues have associated paging pro- 
cessors, each of which handles the particu- 
lar paging function required by the PCBs on 
that queue. When the paging routines have 
completed processing, the page is in real 
storage and the user continues processing. 


For a more detailed introduction to pag- 
ing supervision, see Section 5. 


Virtual Storage Supervision 


The supervisor controls tasks through 
the task queue and the RB queues; it con- 
trols programs through the RB queues and 
the contents directory. Another major 
function, controlling virtual storage, is 
accomplished through a series of virtual 
storage queues. 


When the job management routines design- 
ate a job step as a task, they request a 
region of virtual storage to be used in 
performing that task. The size of the 
region is specified Ly the user; the region 
contains the job pack area for the step, 
and all additional working space needed. 


All requests for virtual storage are 
handled by the GETMAIN routines. The 
supervisor maintains virtual storage queues 
to reflect storage assignments; the GETMAIN 
routines simply adjust these queues to 
reflect new assignments. 


When there are no job steps in the sys- 
tem, all of the dynamic area of virtual 
storage is treated as one region. It is 
represented to the supervisor by an FBQE 
(free block queue element) and a PQE (par- 
tition queue element) in the system queue 
area. The PQE contains the address of the 
FBQE, and the FBQE contains the address of 
the beginning of the free area. When space 
is requested for a job step, the GETMAIN 
routines subtract the requested area size 
from the free area and build a new FBQE and 
PQE for the new region. The address of the 
PQE is placed in the TCB of the job-step 
task. 


After job-step initialization, a program 
performing a task may request virtual 
Storage by issuing the GETMAIN macro 
instruction. The GETMAIN SVC routine allo- 
cates the storage only within the region 
assigned to the job step or within the 
local system queue area or the system queue 
area. Storage is allocated in the local 


System gueue area and the system queue area 
only if the requester is a supervisor 
routine. 


The supervisor maintains a sefarate 
chain of queue elements for allocation 
within a region. This chain keers track of 
sukpools within the region. A subpool is 
all of the virtual storage requested under 
a lakel called a subpool number. All of 
storage in a subpool does not need to Le 
requested at the same time nor does it need 
to be contiguous. The chief advantages of 
sukpcols are: (1) that the storage can be 
shared between tasks, and (2) that all of 
the storage identified by a subpool number 
can ke released with one FREEMAIN macro 
instruction. 


The supervisor FREEMAIN routines are 
used to free virtual storage when it is no 
longer needed. Space assigned to a job 
step, Space within a region, space within 
the local system queue area, and sface 
within the system queue area are all freed 
ky the FREEMAIN routines. These routines 
wake space available by adding elements to 
chains in which are recorded all free areas 
in virtual storage, and ky adjusting the 
queues of allocated space. 


For a more detailed introduction to vir- 
tual storage supervison, see Section 6. 


Timer Supervision 


Timer supervision routines support the 
System/370 time-of-day clock, clock con- 
parator, and CPU timer features. These 
routines enable the programmer to oktain 
the date and time of day, measure periods 
of time, or schedule activity for a specif- 
ic time of day. The routines are executed 
as a result of the macro instructions TIME, 
STIMER, and TIMER, and are handled just 
like any other SVC routines. 


Timer supervision maintains two queues 
cf TQEs (timer queue elements): one for 
task-timing requests and the other for 
real- and wait-timing reguests. The TQEs 
are constructed by the STIMER routine, and 
each element represents a request for a 
type of timed interval. The TQE is flaced 
cn the appropriate queue in the order in 
which the requested interval expires. When 
a time interval expires or a particular 
time of day is reached, a timer interrup- 
tion occurs. This interruption causes the 
Timer Interruption Handler to remove the 
top element from the appropriate timer 
queue and to determine what action to ke 
taken. Examples of required action are: 
(1) scheduling a timer exit, or (2) making 
a task ready and eligible for dispatching. 


For a more detailed introduction to 
timer supervision, see Section 7. 
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Task Termination 


The supervisor performs the processing 
needed when a task is terminated, either 
normally or abnormally. The termination 
processing includes releasing system 
resources that were assigned to the task. 


The End of Task (EOT) routine performs 
normal terisination processing. Abnormal 
termination is performed by the ABTERM and 
ABEND routines. The STA Services and ASIR 
(ABEND/STA Interface) routines provide a 
means for recovery from errors causing 
abnormal termination. The ABDUMP and 
SVCDUMP routines provide a dump of control 
blocks and virtual storage related to the 
terminating task. 


For a more detailed introduction to ter- 
mination, see Section 8. 


SPECIAL FEATURES 


The following subsections describe spe- 
cial program features provided in the 
supervisor. 


Authorized Program Facility 


The APF (authorized program facility) 
restricts the use of sensitive system ser- 
vice to authorized users. The authoriza- 
tion consists of a code designated by the 
installation, applied at the job-step 
level, and used with programs residing in 
the SYS1.LINKLIB data set, the SY¥YS1.SVCLIB 
data set, and the link pack area. The 
facility is supported primarily by contents 
supervision and task supervision. 


Both problem programs and system fro- 
grams can test whether a task has authori- 
zation to use a specific function by issu- 
ing the TESTAUTH SVC macro instruction (SVC 
119). 


Automatic Priority Grouping 


The automatic priority grouping 
mechanism operates within the dispatcher. 
The user may specify a single dispatching 
priority as an APG (automatic priority 
group). Tasks within the APG are dis- 
patched in a way that makes best use of the 
system's CPU and I/O capabilities. The 
dispatcher identifies these tasks as I/0- 
oriented or CPU-oriented, according to 
which facility they use more (paging I/O is 
excluded from this determination). The 
dispatcher shifts the APG tasks on the task 
queue so that the I/0O-oriented tasks are 
dispatched first. For more information, 
see “Section 3: Task Supervision." 
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Shared Direct Access Storage Device 


The shared DASD (shared direct access 
storage device) feature enables inderen- 
dently operating data processing systems to 
share direct access storage devices. The 
feature employs the two-channel switch and 
its control commands, device reserve and 
device release. The shared DASD feature is 
a general name for control program func- 
tions that actually reserve and release 
each device. Essentially, this feature 
controls the use of a serially reusable 
resource, the device and the shared data. 





S) 


System Management Facilities 


SMF (system management facilities) is a 
Standard feature of the control program. 
It gathers and records information used to 
evaluate system, data set, and direct 
access volume usage. SMF functions are 
performed Ly jok management, input/output 
Support, direct access device storage mana- 
gement, and supervisor routines. The 
Supervisor performs the following SMF 
functions: 


e Maintains a record of system wait time. 


e Assists in handling time limit 
expirations. 


e counts and records references to user 

data sets. | 
e Controls the output limit for SYSOUT 

data sets. 


e Maintains a record of virtual and real 
storage usage. 


e Records paging statistics. 


Time Sharing Option 


TSO (the time sharing option), a stan- 
dard OS/VS2 facility, adds general-fpurrose 
time sharing to the facilities available 
with the VS2 control program, and the 
supervisor supports TSO operations. This 
facility enakles users at remote terminals 
to execute programs concurrently and to 
interact with those prcgrams during execu- 
tion. The installation can dedicate its 
system to time-sharing operations or it can 
run time-sharing and batch-processing 
operations concurrently. 


The time sharing opticn consists of a 
control frogram (containing IBM-supplied 
service routines and command processors) 
and a number of IBM Program Products 
(available from IBM for a license fee). 
The TSC control program, an extension of 
the VS2 control program, does the 
following: 





S 


e Identifies and verifies the time shar- 
ing user. 


e Defines the user job. 


e Assigns the user jok an amount of 
execution time (as determined by 
installation, and called the selected 
scheduling algorithm). 


e Ensures a specified percentage of 
execution time for batch-processing 
operations (when required). 


®e Logically disconnects the user job from 
the operating system before the job is 
swapped out of real storage (called 
"quiescing” the jok); logically recon- 
nects the user job to the operating 
system when the jok is swapped into 
real storage (called “restoring"™ the 
jOb.) 


e Establishes and maintains communica- 
tions between the terminal user, his 
programs, and the TSO control program. 


e Handles attention interruptions from 
the terminal user. 


e Provides an optional set of SMF records 
for the TSO system. 


e Allows optional system control task 
exits to installation-supplied 
routines. 


e Provides an optional record of the 
information that is passed to the Time 
Sharing Driver via the Time Sharing 
Interface Program from such TSO system 
routines as the Region Control Task, 
the Time Sharing Control Task, and the 
Time Sharing Dispatcher. 


For a complete description of the TSO 
control program, 


Program Logic manual. 
Time Slicing 


The time-slicing mechanism operates 
within the dispatcher. A priority is 
asSigned to a group of tasks which are to 
be time-sliced; time-slicing occurs only 
among the tasks in the group and only when 
the priority level of the group is the 
highest priority level that has a ready 
task. Each task in the group is dispatched 
for the specified time slice. The dis- 
patching of tasks within the group con- 
tinues until all the tasks are waiting, or 
a task of higher priority than that of the 
group becomes ready. 


The group of tasks to be time-sliced, 


the length of the time slice, and the 
priority of the time-sliced tasks are spe- 


. Section 1: 


see the OS/VS2 TSO Control 


cified by the installation. Any task in 
the system that is not defined within the 
time-sliced group is dispatched under the 
regular conditions; that is, the task is 
dispatched when it is the highest-priority 
ready task, and it remains active until it 
either waits or until a task of higher 
priority becomes ready. 


Tracing Facilities 


Two facilities, the trace table facility 
and GFT (generalized trace facility), are 
provided to assist in tracing program flow 
ky mcnitoring and recording system events. 


Trace Takle Facility: The trace table 
facility is an optional feature specified 
at system generation or nucleus initializa- 
tion. The trace table routines place 
entries, each of which is associated with a 
certain type of event, in a trace table. 
The size of the table is also a system 
generation or NIP option; when the table is 
filled, the routine overlays old entries 
with new entries beginning with the oldest 
entry in the table. Trace table entries 
are formatted and printed out on SNAP dumps 
and stand-alone dumps. For wore informa- 
tion, see “Section 2: Interruption 
Supervision." 


Generalized Trace Facility: The genera- 
lized trace facility is invoked as a system 


task when the operator issues the START 
cormand. When GTF is started, the operator 
selects specific events to be traced and 
May select to record the trace data either 
in virtual storage or on an external 
device. When the internal storage oftion 
is selected, the recorded data is compar- 
able to that provided by the trace takle 
facility. When the external device storage 
option is selected, the recorded data is 
more comprehensive. 


When GTF is active, the trace table 
facility, if present, is disabled. When 
the trace records are maintained in virtual 
storage, ABDUMP provides formatted trace 
data for aknormally terminated programs 
when a SYSABEND DD statement has been 
included. When trace records are stored on 
an external device, a trace EDIT function 
of IMDPRDMP can be used to provide the out- 
fut cf selected data. 


Support for GTF is included in the 
interruption supervision function of the 
Supervisor (see Section 2.) For a complete 
description of GTF logic, see the OS/VS 


Service Aids Logic manual. 


SUMMARY CF THE SUPERVISOR'S ROLE 


The supervisor is a ccllection of fro- 
grams for handling interruptions and pro- 
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viding services in response to them. These 
interruptions are the basic method by which 
the control program manages data processing 
tasks. The supervisor functions are large- 
ly performed by routines that manipulate a 
network of control queues -- the task 
queue, the RB queues, the contents direc- 
tory, the paging queues, the real storage 
queues, the virtual storage queues, the 
ENQ/DEQ resource queues, and the timer 
queues. 


The processing after a timer/external, 
input/output, program, or machine-check 
interruption is generally straightforward. 
The processing after an SVC interruption is 
more complicated. Diagrams 1.1 through 1.3 
illustrate supervisor interruption 
processing. 
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Diagram 1.1 (Page 1 of 3) 
Supervisor Overview and Visual Table 


of Contents for Diagrams 


Machine Check Interruption SVC Interruption 


MACHINE CHECK HANDLER 


SVC FIRST-LEVEL INTERRUPTION HANDLER 


Recovery Management Support 


Save register contents of the interrupted 
(See OS/VS Recovery program. 

Management Support 

Logic Order No. SY27-7239) 


See Diagram 1.2 for 
a description of the 
type-] SVC routines 
processed by the supervisor 


See Diagram 2.2: Type-1 SVC 
Interruption Handling 

See Diagram 2.0: Interruption Supervision 
Visual Table of Contents 

See "Section 2: Interruption Supervision” 









SVC SECOND-LEVEL INTERRUPTION HANDLER 


Branch to the SVC routine that will provide the requested service. 












See Diagram 2.3: Handling Types 
2,3, 4, SVC 
Interruptions 






A Type-1 SVC 


Routine 1 | 

























A Type-4 SVC 
Routine 





A Type-2 SVC A Type-3 SVC 
Routine 2 Routine E] 


ATTACH Other Type-2 
Routine SVC Routines 







ABTERM 
PROLOGUE 


TY PE=-1 EXIT 
Routine 











1 Type-1 SVC routines are part of the nucleus EXIT ROUTINE 


and are disabled for 1/O and external 
interruptions, These routines do not issue 
SVC instructions because they cannot be 
restarted after an SVC interruption. They 
can restart after a missing page interruption, 








See Diagram 3.14 







See Diagram 8,11 See Diagram 3.15 





PF] Type-2 SVC routines are part of the nucleus 
but may be enabled for |/O and external 
interruptions during part of their processing. 
These routines may issue SVC instructions. 





Directly to 
interrupted 
routine 






3 | Type-3 SVC routines are nonresident. (They 
reside in the link pack area.) They may be 
enabled for I/O interruptions. These routines 
may issue SVC instructions. 


4 Type-4 SVC routines are nonresident. (They 
reside in the link pack area.) They may be 
enabled for 1/O and external interruptions. 





DISPATCHER 
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These routines may issue SVC instructions. 





See: Diagram 3.17 


02 


Interruption 
Code: 

X'0' through 
x 'ES 


Program-Check 
Interruption 


See Diagram 2.8: 


Program =Check 
Interruption 
Handling 


ABTERM PROLOGUE 


Schedule abnormal 
termination of the 
task. 


See Diagram 8.11: 
ABTERM Prologue 


See Diagram 8.10: 
Overview of the 
ABTERM Routines 


See Diagram 8.0: 
Termination Visual 
Table of Contents 


See "Section 8: 
Termination" 





PROGRAM 


Program Interruption 


FIRST-LEVEL 


Determine the cause of the interruption. 


Interruption 
Code: X'10' Code: 
Segment Translation 
Exception 


(Handled as a 
program-check 
interruption 


code X'4') 


PAGING SUPERVISOR 
PROGRAM CHECK 
INTERRUPTION EXTENSION 


Initiate page-in for 
missing page. 


See Diagram 5.46: 
Program Check 
Interruption 
Extension 


See Diagram 5.1: 
Missing Page 
Interruption 
Processing 


See Diagram 5.0: 
Paging Supervision 
Visual Table of 
Contents 


See "Section 5: Paging 
Supervision" 





Interruption 


X11! 


Page Translation 
Exception (missing 
Page Interruption) 


Interruption 
Code: X'12' 


Translation 
Specification 
Exception 


See Diagram 2.7: 


INTERRUPTION 


Interruption 


Code: 


SSM Interruption 


Diagram 1.1 (Page 2 of 3) 
Supervisor Overview and Visual Table 
of Contents for Diagrams 


HANDLER 


See Diagram 2.5: 


See Diagram 2,0: 


Program Interruption 
Handling 

Interruption Supervision 
Visual Table of Contents 


See "Section 2: Interruption Supervision" 


interruption 


X13! Code: X'40' 


Monitor Call 


(MC) Interruption 


Processing handled 
by Program FLIH 


Interruption 
Code: X'‘80’ 


Program Event 
Recording (PER) 
Interruption 


Page Fault 
Processing 


See Diagram 2.6: 
SSM Interruption 
Processing 


PAGING SUPERVISION 
ERROR RECORDER 


If the task that produced 
translation specification 
exception is in key 0 
(supervisor state), the 
error is considered major 
and the system is placed 
in a disabled wait state. 
Otherwise, the error is 
considered minor and the 
task is scheduled for 
abnormal termination, 


See Diagram 5,54: 
Paging Supervisor 
Error Recorder 


See Diagram 5.5: 
Branch Entry Page 
Processing 


See Diagram 5.0: 


Paging Supervision 


Visual Table of 
Contents 


See "Section 5: Paging 





Supervision” 





GENERALIZED TRACE 
FACILITY (GTF) 


Record the interruption. 


(See OS/VS Service Aids 


Logic, Order No. SY28-6635) 





DISPATCHER 


Select the next 
task to receive 
control. 


See Diagram 3. 17: 
Dispatcher 


See Diagram 3.0: 
Task Supervision 
Visual Table of Contents 


See "Section 3: 
Task Supervision" 
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External Interruption 


EXTERNAL FIRST-LEVEL 
INTERRUPTION HANDLER 


Determine the cause of the interruption. 
See Diagram 2.4: External Interruption 
Handling 
See Diagram 2.0: Interruption Supervision 
Visual Table of Contents 
See "Section 2: Interruption Supervision" 


Interruption Code: | Interruption Code: Interruption Code: 


X'1007! X'1005' X'1004' 


Operator Key CPU Timer Clock Comparator 
Interruption Interruption Interruption 


COMMUNICATIONS TASK TIMER SECOND-LEVEL 
EXTERNAL INTERRUPTION INTERRUPTION HANDLER 
PROCESSOR 


Process clock comparator 
and CPU timer interruptions. 
(See OS/VS2 Job Management 
Logic, Order No. SY28-0621) See Diagram 7.5: Timer 
Second-Level Interruption 
Handler 


See Diagram 7.0: Timer 
Supervision Visual Table of 
Contents 


See "Section 7: Timer 
Supervision" 
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Diagram 1.1 (Page 3 of 3) 
Supervisor Overview and Visual Table 
of Contents for Diagrams 


1/O Interruption 















|/O FIRST-LEVEL INTERRUPTION 
HANDLER 

Pass control to the I/O 
supervisor. 


See Diagram 2.1: I/O Interruption 
Handling 

See Diagram 2.0: Interruption Supervision 
Visual Table of Contents 

See "Section 2: Interruption Supervision" 


I/O SUPERVISOR 





(See OS/VS 1/0 Supervisor 
Logic, Order No. SY24-5156) 


aA 


SVC NUMBER 


NAME OF 
ROUTINE 


DESCRIPTION 


DETAILED 
DIAGRAM 


OVERVIEW 
DIAGRAM 


TEXT 
INTRODUCTION 


WAIT Exit Routine 
Routine 


GETMAIN 
Routines 


FREEMAIN 


Routines 





e Handle exiting 
procedures for all 
programs excep! 
type-1 SVC 


routines, 


e@ Halt the execution 
of a program until 
a specified number 
of events have 


storage in the 


occurred, specified. 





Diagram 3.7 


e Allocate virtual 


requested amount 
from the subpool 





@ Free allocated 
virtual storage in 
the length and 
subpool specified. 


Diagram 3.14 Diagram 6.2 Diagram & ,27 Diagram 6.2 and Diagram 3.11 
Diagram 6.27 


e@ Determine whether 





FIRST-LEVEL 


M ‘ 
REGMAIN Routine Exit Effector 


e Create IRBs and 
TIRBs, 


@ Adjust a task's 
a GETMAIN or 
FREEMAIN macro 
Instruction was 
issued, and pass 
control to either 
the GETMAIN 
routines (Diagram 
6.2) or the 
FREEMAIN routines 
(Diagram 6.27). 


INTERRUPTION 


Set Status Routine 


dispatchability. 


HANDLER 


MODESET Routine 


@ Change the system 
mask, storage 
protection key, or 
the mode in the 


PSW, 


Diagram 3,18 Diagram 3.21 


Section 3: Task Section 3: Task Section 6: Virtual Section 6: Virtual Section 4: Virtual Section 3: Task 
Supervision Supervision Storage Supervision Storage Supervision | Storage Supervision Supervision 


Section 3: Task 
Supervision 


Section 3: Task 
Supervision 





Release Routine 
(PGRLSE, 


nonsupervisor) 


e Make available all 
real and external 
page storage wholly 
associated with a 
specified area of 
virtual address 
space, 


@ Return to the Type-| 


Exit Routine or the 
caller. 


Diagram 5,30 


PGFIX/PGFREE/ 
PGLOAD/PGRLSE 


(supervisor) 


e@ FIX: Fix virtual 
storoge areas in 
real storage and 
make them 
ineligible for 


page-out, 


e@ FREE: Make 
previously fixed 
areas eligible for 
page-out, 


e LOAD: Bring 
specified areas of 
virtual storage 
into real storage 
from external 


page storage, 


e@ RELEASE: Branch 
to the Release 


routine (IEAPCLR). 





Diagram 1.2 
Type-1 SVC Processing 
Performed by the Supervisor 






; TESTAUTH Routine 
Interface Routine 


e Obtain page control} e Determine whether 
blocks (PCBs). a program is 
euthorized to use 
the resource or 
function, 


@ Place one PCB on 
the swap queue for 
further processing 
by IEAPSWAP and 
one on the queve 
for swap root PCBs, 





Diagram 5.20 Diagram 5.41 Diagram 3.20 
te a aged os 
Section 5: Paging Section 5: Paging Section 5: Paging Section 3: Task 
Supervision Supervision Supervision Supervision 
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Diagram 1.3 (Page 1 of 4) 
Types 2, 3, and 4 SVC Processing 
Performed by the Supervisor 















INTERRUPTION HANDLER 






SVC SECOND-LEVEL 
2) 


2 


NAME OF POST Routine LINK Routine XCTL Routine LOAD Routine 
ROUTINE 


DESCRIPTION 












e Bring the load module 
containing a specified 
entry point into virtual 
storage if a usable copy 
is not available, 


e Pass control to a specified 
entry point. The load 
module containing the 
entry point is brought into 
virtual storage if a usable 
copy is not available, 

No return is made to the 
program issuing the XCTL 
macro instruction. 


e Pass control to a specified 
entry point. The load 
module is brought into 
virtual storage if a usable 
copy is not available, 
After the execution of the 

called program, control 

is returned to the instruc- 

tion following the LINK 

macro instruction. 


e Signal the occurrence of 
an awaited event to the 
waiting program. 













































DETAILED Diagram 3.8 Diagram 4,2 Diagram 4,8 Diagram 4.7 
DIAGRAM 

OVERVIEW Diagram 3.1 Diagram 4.] Diagram 4.1] Diagram 4.1 
DIAGRAM 

TEXT Section 3: Task Section 4: Contents Section 4; Contents Section 4: Contents 
INTRO DUCTION Supervision Supervision Supervision Supervision 


nZ 


Diagram 1.3 (Page 2 of 4) 
Types 2, 3, and 4 SVC Processing 
Performed by the Supervisor 














INTERRUPTION HANDLER 





SVC SECOND-LEVEL 
14 


9 1] 12 37 40 
SVC NUMBER 


Dae DELETE Routine TIME Routine SYNCH Routine ABEND Routine SPIE-Routing SEGLD or SEGWT Routine EXTRACT Routine 


DESCRIPTION e Decrease the use count for | @ Determine the time of day | @ Allow a supervisor routine | @ Free control blocks, e Perform the processing e Load specified overlay e Obtain information for a 
modules fetched by a LOAD and date and return both to synchronously exit to a storage, and other necessary to allow the user segments, task from that task's TCB 
macro instruction. to the caller. user program, resources used by the to specify an exit routine or the TCB of a subtask. 

terminating task (or tasks) to be scheduled after a 
e Free storage occupied by a and subtasks, program interruption, 
module that was requested 
through a LOAD macro @ Invoke ASIR if a STA user 
instruction and is no longer exit routine exists, 
needed, 









e Invoke ABDUMP if 
requested, 









Diagrams 8.14 
through 8,24 





DETAILED Diagram 4.9 Diogram 7.2 Diagram 4.6 Diagram 3.6 Diagram 4.12 Diagram 3.4 
DIAGRAM 
OVERVIEW Diagram 4.1] Diagram 7.1 Diagram 4.1 Diagram 8.13 Diagram 3.1 Diagram 4.1 Diagram 3.1 
DIAGRAM 


TEXT Section 4: Contents Section 7: Timer Section 4: Contents Section 8: Termination Section 3: Task Supervision | Section 4: Contents Section 3: Task 


INTRODUCTION 






Supervision Supervision Supervision Supervision Supervision 
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Diagram 1.3 (Page 3 of 4) 
Types 2, 3, and 4 SVC Processing 
Performed by the Supervisor 


SVC SECOND-LEVEL INTERRUPTION HANDLER 


Al 42 44 46 47 48 5] 


oe IDENTIFY Routine ATTACH Routine CHAP Routine TTIMER Routine STIMER Routine DEQ Routine SVCDUMP Routine 


DESCRIPTION e Inform the supervisor of a | @ Create a task control block | e Change the dispatching e Calculate the time e Calculate and schedule a e Remove requests for e Branch to ABDUMP to 
module's embedded entry- (TCB) to represent the task. | priority for a task or remaining in a requested requested timed interval. resources from the resource display control blocks and 
point name that was not subtask . interval, queves. storage for the specified 
established by the linkage | @ Schedule linkage to task, 
editor. contents supervision to e Cancel the interval, 

obtain the program to be @ Display the virtual storage 

first executed for the new specified by the key 0 

task, issuer of the SVC 51 macro 
instruction, 











DETAILED Diagram 4,10 Diagram 3.2 Diagram 3.3 Diagram 7.4 Diagram 7.3 Diagram 3.10 Diagram 8.26 
DIAGRAM 
OVER VIEW Diagram 4.1 Diagram 3,1 Diagram 3.1 Diagram 7.1 Diagram 7.1 Diagram 3.1 Diagram 8.25 
DIAGRAM 


TEXT Section 4: Contents Section 3: Task Section 3: Task Section 7: Timer Section 7: Timer Section 3: Task Section 8: 
INTRODUCTION Supervision Supervision Supervision Supervision Supervision Supervision Termination 






Diagram 1.3 (Page 4 of 4) 
Types 2, 3, and 4 SVC Processing 
Performed by the Supervisor 
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SVC SECOND-LEVEL INTERRUPTION HANDLER 
SVC NUMBER 
NAME OF 


ROUTINE 


DESCRIPTION @ Queue requests for # Create a STA control block | # Remove the specified TCB 
resources (data sets, containing the address of a from the task queue, 
records, programs, etc.) to user-written exit routine 
control access. and a parameter list. o Free the TCB's storage 

ABEND invokes the space and the associated 
ABEND/SSTA Interface problem-program register 
routine to schedule the user | save area. 

exit routine upon abnormal 

termination, 


DETAILED Diagram 3.9 Diagrams 8.43 Diagram 3.5 
DIAGRAM through 8.47 

OVER VIEW Diagram 3.1] Diagram 8,42 Diagram 3.1 
DIAGRAM 

TEXT Section 3: Task Section 8: Section 3: Task 
INTRODUCTION Supervision Termination Supervision 
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Any interruption, except a machine-check 
interruption, causes CPU control to be 
taken from the executing program and given 
to an interruption-handling routine of the 
Supervisor. There are four interruption- 
handling routines in the supervisor, one 
for each type of interruption excerpt the 
machine check. (A machine check causes 
control to be passed directly to the 
Machine Check Handler, a standard recovery 
program of the operating systen.) 


The five types of interruptions are: 


e Input/output interruptions, which occur 
when an I/O operation terminates, when 


an I/O error occurs, or an I/O device 
is made ready. 


e SVC interruptions, which occur when an 


SVC instruction is executed. 


e External/timer interruptions, which 
occur when the interrupt key is pressed 


on the system operator‘’s console, or a 
time interval expires. 


e Program interruptions, which occur when 
a program attempts an invalid operation 
(for example, execution of a privileged 
instruction by a program in problem 
state), when a data error is detected 
(for example, overflow), or when an 
address translation exception, enable/ 
disable interruption, or event- 
monitoring interruption occurs. 


e Machine-check interruptions, which 
occur when the CPU detects a hardware 


malfunction. 


An interruption causes the current PSW 
to be saved as the old PSW, and the new PSW 
to be executed. The new PSW causes control 
to be passed to the appropriate 
interruption-handling routine. 


In most cases, the interruption handler 
does not do the detailed processing itself; 
instead, it analyzes the interruption and 
routes control to an interruption proces- 
Sing routine. 


For input/output interruptions, the 
interruption handler branches to the Input/ 
Output Supervisor which performs input/ 
output services and handles input/output 
errors. 


For Svc interruptions, the interruption 
handler determines which SVC service is 
required, causes the SVC routine to he 
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krought into real storage (if necessary), 
and passes control to it. 


For external/timer interruptions, the 
interruption handler determines the cause 
of the interruption and branches either to 
a timer service routine or to an external 
service routine. 


For program interruptions, the interrup- 
tion handler determines the cause of the 
interruption and does one or more of the 
following: 


e Branches to the DSS Program Interrup- 
tion Handler if DSS (the dynamic sup- 
port system) is active (see the OS/VS 


Cynamic Support System Logic manual for 


more information on [SS operations). 


e Branches to the paging supervisor for 
processing of address translation 
exceptions. 


e Pranches to a user error-handling 
routine. 


e Branches to the generalized trace faci- 
lity to record the event. 


e Enakles or disables interruptions. 


e Terminates the task in which the inter- 
ruption occurred. 


The interruption handlers are disabled 
for all interruptions except machine checks 
so that they will not lose control kLefore 
they have saved critical information akout 
the interrupted program. This information 
consists of the register contents and the 
PSW information necessary to return control 
to the interrupted program after the inter- 
ruption has keen processed. 


This section contains descriptions of 
I/O, SVC, external/timer, and program 
interruption handling. Machine-check 
handling is not described in this manual. 
For a description of machine-check handl- 
ing, see the OS/VS Recovery Management Sup- 
port Logic manual. 


INPUT/OUTPUT INTERRUPTION HANDLING 
(See Diagram 2.1) 
When an input/output interruption 


occurs, the I/O FLIH (Input/Output First- 
Level Interruption Handler) is entered 
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automatically as the result of the loading 
of the I/O new PSW. 


The I/O FLIH branches to the input/ 
output supervisor and, if necessary, the 
Page I/O Post routine. The input/output 
Supervisor performs all input/output ser- 
Vices and error handling for I/O interrup- 
tions while the Page I/O Post routine notes 
completion of paging I/O operations. 


The I/O FLIH branches to the system 
Management facility's Wait-time Collection 
routine if the system was in wait state at 
the time of the interruption. The I/O FLIH 
also interfaces with the system Trace rou- 
tine to have the interruption recorded. 


The I/O FLIH returns to either the 
interrupted program or the dispatcher 
depending on whether system services are 
required as a result of the I/0 
interruption. 


SVC INTERRUPTION HANDLING 
(See Diagrams 2.2 and 2.3) 


When a system or user program executes a 
macro instruction, the last machine 
instruction of the resulting macro- 
expansion is often an SVC instruction. 

When executed, the SVC instruction causes 
an SVC interruption. The part of the 
supervisor that receives immediate control 
is called the SVC FLIH (SVC First-Level 
Interruption Handler). 
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SVC Register Save 
Area in Lower Real 
Storage 


Figure 2-1. 





Saving the Status of the Interrupted 
Progra 


The current PSW, containing the address 
of the next executable instruction, is 
stored by the machine in location X‘'20*° in 
lower real storage. The SVC FLIH saves the 
register contents and old PSW of the inter- 
rupted routine to permit control to be 
returned to the routine at its next execut- 
able instruction. The register contents 
are saved by the SVC FLIH in a special SVC 
save area in lower real storage, called 
IEASCSAV. Figure 2-1, parts A and B show 
the saving of the PSW and the register con- 
tents, respectively, by the machine and Ly 
the SVC FLIH. 


The register contents and old PSW remain 
in lower real storage or are moved to other 
Save areas, depending on the type of SVC 
routine to be executed. If a type-1 SVC 
routine is to Ee executed, the register 
contents and old PSW are left in lower real 
storage. If one of the other types of SVC 
routines is to be executed, the information 
is moved to other save areas. 


The reason for this is that a type-1 SVC 
routine cannot issue an SVC instruction or 
a macro instruction that expands into an 
SVC instruction. In addition, during 
execution of type-1 SVC routines, interrup- 
tions are disakled, ensuring that an SVC 
instruction will not be issued in another 
routine. Consequently, there is no danger 
of a seccnd entry to SVC processing during 
execution of a type-1 SVC routine and 
therefore no danger of having the informa- 
tion for the current interruption overlaid. 
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Action by the SVC Second-Level Interruption Handler 


Because non-type-] SVC routines can be interrupted, the SVC Second-Level 
Interruption Handler moves the SVC old PSW and the interrupted routine's 
register contents. 


IEASCSAV SVC Old PSW 


Interrupted 
Program's RB 


Register Save Area 


Actions taken by the SVC First-Level and Second-Level Interruption Handlers 


to save program status information. 
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However, any of the other types of SVC 
routines can be interrupted by an SVC 
interruption. This requires that the sta- 
tus information for the current interrup- 
tion be moved to new areas to prevent it 
from being lost. 


To determine the tyre of SVC routine 
that will be executed, the SVC FLIH 
examines the SVC table. There are two 
parts to this table, one containing entries 
for user-supplied SVC routines, the other 
containing entries for IBM-supplied SVC 
routines. The number and type of routines 
in the two parts depend on the particular 
system that the user specified at system 
generation. There is one entry in the SVC 
table for each SVC routine in the generated 
System. Each entry contains a code showing 
the SVC type. 


If the Svc table indicates that a type-1 
routine is to be executed, the SVC FLIH 
branches to the routine, and the status 
information for the current interruftion is 
left in lower real storage. 


But, if the SVC routine is not type-1, 
and is interruptable, the SVC FLIH branches 
to the SVC SLIH (SVC Second-Level Interrup- 
tion Handler) to create an SVRB (supervisor 
reguest block). The SVRB is used to hold 
the interrupted routine's register contents 
and return information for the SVC routine. 
The SVC SLIH moves the SVC old PSW, the ILC 
(instruction length code), and the inter- 
ruption code to the interrupted routine's 
RB. The register contents are moved to the 
SVRB instead of the RB because the RB may 
lack a register save area. The SVRB is 
constructed by using the quickcell alloca- 
tion technique described in "Section 6: 
Virtual Storage Supervision." 


The SVC SLIH also sets status bits in 
the SVRB. These bits indicate that the 
SVRB is a dynamic request block that can be 
freed by the supervisor's Exit routine and 
that no attention exits can be taken while 
the SVRB is active. The SVC SLIH then adds 
the SVRB to the head of the RB queue 
belonging to the interrupted routine‘'s TCB. 
(For an explanation of the RB queue, see 
"Section 3: Task Supervision.) 


Determining Whether the Disabled SVC 
Routine is in Real Storage 


After the SVRB has keen initialized and 
added to the RB queue, the SVC SLIH deter- 
mines whether the SVC routine is to receive 
control disabled, and if so, whether it is 
in real storage. To do this, it tests the 
"type" bits in the SVC table entry passed 
by the Svc First-Level Interruption Handl- 
er. Type-2 SVC routines are located in the 
nucleus and therefore are fixed in real 
storage. Type-3 and type-4 SVC routines 


that receive control disabled might not tLe 
in real storage, so the SVC SLIH issues a 
Load Real Address (LRA) instruction and 
tests the condition code to determine 
whether the SVC routine is present. 


Enabling and Disabling Interruptions 


If the SVC routine is in real storage 
and is to receive control with interrup- 
tions disakled, the SVC SLIH branches 
directly to it since the SVC SLIH itself is 
already disabled. 


If the SVC routine is to receive control 
with interruptions enabled, the SVC SLIB 
kranches to MODESET (a centralized facility 
to set the system mask -- see "Section 3: 
Task Supervision"). MODESET changes the 
system mask to enakle interruptions as 
requested, and then returns control to the 
Svc SLIH. Upon return from MODESET, the 
SVC SLIH restores general registers 0, 1, 
13, and 15 from the SVRB register save area 
so that they contain the same values as 
when the SVC was issued, and then Eranches 
to the SVC routine. 


When a type-3 or type-4 SVC routine to 
be entered disabled is not in real storage, 
the SVC SLIH branches to MODFSET to enable 
interruptions. While enabled, the SVC SLIH 
references the first instruction of the SVC 
routine, causing the SVC routine to he 
paged in by the paging supervisor. When 
the SVC routine has been paged in, the SVC 
SLIH issues a MOLCESET Svc (Svc 107) to dis- 
able interruptions. When control is 
returned from MODESET, the SVC SLIH 
restores registers 0, 1, 13, and 15 from 
the SVRB general register save area so they 
will have the same values as when the SVC 
was issued, and branches to the SVC 
routine. 


Minor Functions of SVC Interruption 
Handling 


In addition to the major functions 
already described, the SVC interruption 
handlers perform five minor functions: 


1. They use the TESTAUTH routine to veri- 
fy that the issuer is authorized to 
use an SVC routine that requires 
authorization. (If the user is not 
authorized, the task issuing the SVC 
is scheduled for abnormal 
termination.) 


2. They check the validity of the SVC 
number. 


3. They allow the interruption to ke 
recorded. 


4. They make available the addresses of 
three important control blocks (CVT, 
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TCB, and RB) for use Ly other supervi- 
sor routines during later processing 
of the SVC interruption. 


5. They pass the address of the appropri- 
ate exit routine in the return regist- 
er so that the SVC routine, when conm- 
plete, can return control by means of 
a simple branch, without the need for 
tests. 


TIMER/EXTERNAL INTERRUPTION HANDLING 
(See Diagram 2.4.) 


The External FLIH (External First-Level 
Interruption Handler) receives control 
after an external interruption. It saves 
the contents of the general registers of 
the interrupted program in the current TCB. 
If the system wait TCB is the current TCB, 
the External FLIH passes control to the 
system management facility‘s Wait-Time 
Collection routine. This routine returns 
control to the External FLIH. 


The External FLIH saves the external old 
PSW and the interruption code in the cur- 
rent RB. It then provides for tracing by 
branching to CVTTRACE and by issuing a Mon- 
itor Call instruction to have the external 
interruption recorded Ly the generalized 
trace facility. 


The External FLIH determines the cause 
of the interruption from the interruption 
code. It then passes control to the Timer 
Second-Level Interruption Handler if the 
interruption was caused by the clock con- 
parator or CPU timer, or to the conmmunica- 
tions task‘s External Interruption Handler 
if it is an operator key interruption. On 
return from the Timer SLIH or the communi- 
cations task‘s External Interruption Handl- 
er, the External FLIH stores the time-of- 
day (TOD) clock value into a special save 
area within the system management facili- 
ty‘s EXCP Counter routine. 


The TOD clock value must be stored as a 
precaution for the case in which the system 
wait TCB is the current TCB, and a clock 
comparator or CPU timer interruption occurs 
but no task switch occurs. In this case, 
if the TOD clock value in the EXCP Counter 
routine had not been reset by the External 
FLIH, the calculated wait time would 
include execution time for the external 
interruption handlers. 


Only clock comparator, CPU timer, and 
interrupt key interruptions are processed. 
All other external interruptions are 
ignored. 
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The External FLIH then branches to the 
dispatcher, which determines the next task 
to receive control. 
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PROGRAW INTERRUPTION HANDLING 


(See Diagrams 2.5 -- 2.9) 


When a program interruption occurs, an 
interruption code describing the cause of 
the interruption is stored at locaticn 
X'8E*. There are four types of program 
interruptions; program-check interrurtions, 
address translation exceptions, enable/ 
disable interruptions, and event monitoring 
interruptions. The following are brief 
descriptions of these types of program 
interruptions. 


e Program-check interruptions: These 
interruptions (indicated by prcgram 
interruption codes X‘'01" through X'0OF') 
are caused by invalid actions such as 
using incorrect addresses, issuing 
invalid operation codes, or issuing 
privileged instructions. Additional 
causes of program-check interrurtions 
are fixed-point overflow, decimal over- 
flow, exponent underflow, and loss of 
significance. These interruptions can 
ke masked out. 


e Address translation exceptions: These 
interruptions (indicated by interrup- 


tion codes X'10' through X‘'12"') are 
caused by a segment translation excep- 
tion, a page translation exception 
(also called a missing page interrup- 
tion), or a translation specification 
exception. A page translation excep- 
tion (page fault) is the most frequent 
cne and generally occurs when a program 
tries to access a virtual storage 
address in a page that has not yet been 
brought into real storage. 


we? 


e Enable/disable interruptions: These 
interruptions (indicated by interrup- 


tion code X‘'13') are caused by a pro- 
gram"s issuing a Set System Mask (SSM) 
instruction to alter the interruption 
State of the system. 


e Fvent monitoring interruptions: These 
interruptions (indicated by interrup- 


tion codes X‘'40' and X‘'80‘') are caused 
by the PER (program event recording) 
feature or by a Monitor Call (MC) 
instruction. 


Interruptions other than the PER inter- 
ruption are mutually exclusive. Multiple 
interruption conditions can occur concur- 
rently since the PER interruption can occur 
Simultaneously with each of the other kinds 
of program interruption. 
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The Program Interruption Handler is 
given control automatically after any pro- 
gram interruption. Upon entry, all inter- 
ruptions, except machine checks, are dis- 
abled and dynamic address translation is 
inhibited to prevent translaticn specifica- 
tion recursions. After saving the status 
information for the interrupted program, 
the Program Interruption Handler determines 
the cause of the interruption by examining 
the interruption code at location X‘8E". 

It then processes the interruption, handl- 
ing translation specification exceptions 
first, invalid recursions next, and then 
page transalation exceptions and the other 
causes Of program interruptions other than 
translation specification exceptions, the 
Program Interruption Handler enables itself 
to receive dynamic address translation 
exceptions. 


PROCESSING FOR PARTICULAR PROGRAM 
INTERRUPT IONS 


The following subsections provide more 
detailed information on particular types of 
program interruptions and how they are 
processed. 


Translation Specification Exceptions 
(See Diagram 2.5) 


A translation specification exception is 
an interruption that occurs when a page 
table entry, segment table entry, or the 
control register pointing to the segment 
table contains information in an invalid 
format. Translation specification excep- 
tions are indicated by program interruption 
code X'12". 


For a translation specification inter- 
ruption, the Program Interruption Handler 
branches to the paging supervisor's error 
routine (IEAPSER). If the interruption 
occurred in a system module, indicated by 
protection key 0, the Program Interruption 
Handler branches to the paging supervisor 
with register 0 set to indicate major 
trouble. When major trouble is indicated, 
the paging supervisor puts the system ina 
wait state. If the trouble is minor, the 
paging supervisor error routine calls 
ABTERM to schedule termination of the spe- 
cified task and returns control to the Pro- 
gram Interruption Handler, which records 
the interruption via the Trace routine and 
the generalized trace facility. The Pro- 
gram Interruption Handler then exits to the 
dispatcher to allow the task to be abnornm- 
ally terminated. 


Recursion 


( (See Diagram 2.5) 


Recursion is not a specific type of 
interruption, it is an unanticipated reen- 
trance into the Program Interruption Handl- 
er that occurs when the Program Interrup- 
tion Handler or one of its extensions 
causes another program interruption. 


A valid recursion can occur in the resi- 
dent GTF (generalized trace facility) 
extension of the Program Interruption 
Handler and is resolved by the GTF exten- 
sion, which reestatlishes the original pro- 
gram interruption conditions. The GTF 
extension resaves the low storage address 
save area, control registers, old PSW, and 
interruption code, and uses these to rees- 
tablish the information required by the 
Program Interruption Handler when a valid 
recursion occurs. 


Recursions that occur when the GTF 
extension is not executing are treated as 
errors, and the task that was executing is 
abnormally terminated. 


Event Recording 
(See Diagram 2.5) 


Event recording occurs as a result of a 
PER or MC (Monitor Call) program interrurf- 
tion, or when the Program Interruftion 
Handler processes any interruption for 
which the tracing option is in effect. 


For MC program interruptions, the GTF 
resident routine is used. This routine 
returns control directly to the interrupted 
program. No event recording is performed 
for invalid recursions. 


PER interruptions are serviced by the 
DSS (dynamic support system) Program Inter- 
ruption Handler and its related routines 


(see the OS/VS Dynamic Support System Logic 
ranual). 


For interruptions consisting of only MC 
or PER, the supervisor's Program Interrurp- 
tion Handler exits to the interrupted pro- 
gram via LPSW, unless a task switch has 
keen estaklished by GTF, in which case GTF 
passes control to the dispatcher. 


Page Translation Exceptions 


(See Diagrams 2.5 and 2.7) 


A page translation exception (also 
called a missing page interruption) occurs 
when a virtual address cannot be translated 
because the invalid bit in the page takle 
entry for the address is set. Page trans- 
lation exceptions (page faults) are signi- 
fied by program interruption code X'11'. A 
page fault can also be caused by referenc- 
ing an invalid page; this condition is 
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treated as a protection exception program 
check (see Diagrams 2.5 and 2.8). 


When a page fault occurs in the input/ 
output supervisor while the "IOS-in- 
process" switch is set, the current task is 
abnormally terminated via the ABTERM Prolo- 
gue routine. If a page fault occurs ina 
disabled routine and the system lock is on, 
the task is also scheduled for abnormal 
termination by the AEBTERM Prologue routine. 
If the interruption occurs in a disabled 
routine and the system lock is not on, the 
Program Interruption Handler turns it on 
(until the referenced page is available) to 
prohibit the execution of tasks that run 
with interruptions disabled. Only tasks 
that run with interruptions enabled are 
dispatched until the system lock is turned 
off by the dispatcher. 


When a page fault occurs in a user task 
and the user has a valid SPIE exit routine, 
the exit routine is dispatched. Otherwise, 
to process a page fault, the Program Inter- 
ruption Handler branches to the faging 
Supervisor's Program-Check Interruption 
Extension (IEAPIX). The extension either 
reclaims the referenced page, assigns the 
page for the first time, or initiates a 
paging operation. The Program-Check Inter- 
ruption Extension returns to the Program 
Interruption Handler indicating whether the 
page was reclaimed, assigned, or is to be 
paged in. The Program Interruption Handler 
exits directly to the task if the page was 
reclaimed or assigned, or to the dispatcher 
to perform a task switch. 


When an invalid page has been 
referenced, the Program Interruption Handl- 
er changes the interruption code to a pro- 
tection exception and handles it as a norn- 
al program-check interruption. 


Segment Translation Exceptions 
(See Diagrams 2.5 and 2.8) 


When a segment address cannot be trans- 
lated by the hardware because the segment 
table address is invalid, or the “segment- 
invalid* bit in the segment table entry is 
set, a segment translation exception 
occurs. Segment translation exceptions are 
Signified by program interruption code 
X*10°. 


When a segment translation exception 
occurs, the Program Interruption Handler 
treats it the same as it treats a page 
translation exception when an invalid page 
has been referenced: the Program Interrup- 
tion Handler changes the interruption code 
to a protection exception and handles it as 
a normal program-check interruption. 
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Program Interruptions from SSM (Set System 
Mask) Instructions 


(See Diagrams 2.5 and 2.6) 


A centralized facility, MODESET, is used 
to set the system mask to enable or disable 
interruptions. Any attempt to change the 
system mask with an SSM instruction causes 
a program interruption (interrupticn code 
X°13'). 


To prevent a recursion that would result 
from a page translation interruption, the 
Program Interruption Handler issues a Load 
Real Address instruction to determine if 
the SSM operand is in real storage. If the 
operand is not in real storage, the inter- 
ruption handler uses the paging supervi- 
sor's Program-Check Interruption Fxtension 
(IEAPIX1) to obtain the page containing the 
operand. When the SSM operand is in real 
storage, the state of the superviscr lock 
determines if and when the Program Inter- 
ruption Handler must set the system mask as 
indicated by the SSM orerand. 


If the state indicated by the SSM 
instruction is the same as the state of the 
requester, the interruption is treated as a 
NOP and control is returned to the inter- 
rupted routine by uSing an LPSW 
instruction. 


If the supervisor lock is set and the 
issuer of the SSM instruction is the paging 
supervisor, the Program Interruption Handl- 
er sets the system mask as indicated by the 
SSM operand. If the supervisor lock is set 
and the issuer of the SSM instruction is 
not the paging supervisor, the Program 
Interruption Handler stacks the SSM 
instruction, (decrements the address in the 
cld PSW Ey four bytes and stores it in the 
RB, saves registers in the TCB, and flags 
the RB nendispatchable until the supervisor 
lock is off). It indicates a task switch 
if necessary (if IEATCBP=IEATCBPt4) ky set- 
ting IEATCBP to zero. If a task switch has 
been scheduled, the Program Interruption 
Handler exits to the dispatcher; otherwise, 
it returns control to the user via an LPSW. 


Program—-Check Interruptions 
(See Diagrams 2.5 and 2.8) 


The Program Interruption Handler 
receives control automatically after any 
Frogram-check interruption. It tests the 
old PSW to determine whether the interrur- 
tion occurred in the supervisor or in user 
code. 


If the interruption occurred in a rou- 
tine in the supervisor state, control is 
passed to the ABTERM Prologue routine which 
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schedules abnormal termination of the task 
that was interrupted. 


If the interruption occurred in user 
code, the Program Interruption Handler 
tests the TCB for a PIE (program interrup- 
tion element) address. A PIE is a control 
block associated with a user's error- 
handling routine. If the user anticipates 
a program-check interruption and wishes to 
perform his own error handling, he issues a 
SPIE (set program interruption element) 
macro instruction. In response to the SPIE 
macro instruction, the SPIE service routine 
constructs a PIE and inserts its address in 
the TCB. 


If the supervisor finds no PIE address 
in the TCB (indicating that the user did 
not specify a routine to process program 
interruptions), the ABTERM Prologue routine 
is entered. If a PIE address is found, the 
Program Interruption Handler tests to 
determine whether the PIE is in real 
Storage. If a PIE exists and is not in 
real storage, the Program Interruption 
Handler uses the Program-Check Interruption 
Extension of the paging supervisor to page 
in the control block. 


The Program Interruption Handler then 
tests the “in-use” bit in the PIE. This 
bit is set whenever control is given to the 
user's error-handling routine. If the bit 
is on, it means that the current program- 
check interruption occurred while the error 
routine was processing a previous progran- 
check interruption, and the task must be 
terminated. If the "in-use" bit is zero, 
the Program Interruption Handler determines 
whether the PICA is in real storage and if 
not, uses the paging supervisor's Program- 
Check Interruption Extension to page in the 
control block. Then the Program Interrur- 
tion Handler determines whether the kind of 
program interruption that occurred was spe- 
cified in the SPIE macro instruction. If 
it was, control is passed to the user's 
error-handling routine. If it was not, 
control is passed to the ABTERM Prologue 
routine which, with the ABTERM routine, 
schedules the abnormal termination of the 
task. 


When a user error-handling routine con- 
pletes its processing, the supervisor Exit 


routine is entered, and the interrurted 
program regains control via the dispatcher. 


TRACING EVENTS 


(See Diagrams 2.10 and 2.11) 


The Trace function records up to 32 
bytes of information, in the form cf a 
Trace takle entry, each time it is called. 
The information it records depends ufon 
which of the six entry points is used. For 
each entry point, Trace processing is tai- 
lored to a specific caller as follows: 


Caller Trace Information Recorded 
Dispatcher PSW to be dispatched; regi- 


sters 0, 1, and 15 of the 
task to be dispatched; TCB 
to be dispatched, time 
stamp. 
External FLIH Old PSW; registers 0, 1, 
and 15; timer queue element 
address (if a timer inter- 
ruption occurred); time 
stamp. 


I/O FLIH Old PSW; CSW; time stamp. 


Ios Start I/0 Condition code; device 
address; CAW; CSW; TCB 
associated with I/0; time 
stamp. 

Program FLIH Old PSW; registers 0, 1, 
and 15; page or segment 
exception address; current 
TCB; time stamp. 

SVC FLIH Old PSW; registers 0, 1, 
and 15; current TCB; time 
stamp. 


The tracing option is selected at nuc- 
leus initialization time. If the tracing 
option is selected (that is, the numker of 
Trace entries > 0) the nucleus initializa- 
tion program sets CVTITRACE = BR 10; other- 
wise, CVTTRACE is set = BR 11 (to return 
directly to the caller, bypassing the trac- 
ing function). 


A dump of the trace table can be 
obtained via SVC DUMP or ABDUMP. 
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IF a paging operation caused the 
interruption, branch to the paging 
supervisor to post completion of the 
paging I/O operation, 


Reset entry switch, 


Exit to dispatcher if task switch or 
asynchronous exit has been scheduled. 
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and control register 1. 
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Diagram 2.1 I/O Interruption Handling (Module IEAVNVO0O) 


a A a a a a a Tos oe 
[ROUTINE | 

NOTES | NAME |LABEL | 

—--~-=-~-----=---- ~-------~--=-+----------=- + -------------- 4-------- $-------- { 
3 When the I/O First-Level Interruption Handler (1/0 | TLEAQIO00 


| 

FLIH) is entered initially, it sets the I/O criginal | 
entry switch (IORGSW). This switch permits the I/O FLIH| | 
to distinguish between an initial entry for an I/0 | | 
operation (when register contents and status information | | 
must be saved) and recursions like those resulting from | | 
retries cf the I/O operation due to errors (when regist- | | 
er contents have already been saved). | 
| 

| 


TEAQWAIT 


r 
| 

| 

t 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| a BR 11 or a branch instruction to the Trace routine ITEACTRCFE|TRIO 
| (if the tracing option was selected). cCcntrcel is re- | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
\ 
| 
| 
| 
| 
| 
| 
| 


| 

| 

| 

etna | | 
5 The I/C FLIH branches to CVTTRACE which contains either |IEAGIOO0O|NIOS 

| 

| 

turned te the I/O FLIH. | 

| 


| 
6 eaneaGoe 
{DISMISS | 
7 iegabieD 
8 Peeacasee oEenon 
9 A task switch is pending if IEATCBP / IFATCEP+4. An TEAGLOON NOBLE 


asynchronous exit routine is pending if 
IEAODSO1i+1 = X*FO'. 


| 
| 
10 The prSW saved in the tcp RB (RBOPSW) of the ciarrent TCB | 
(IEATCBP+4) is restored to the I/O old PSW location, | 
control register 1 is set to the appropriate segment | 
table, general registers are restored, an MC instruction| 

is issued via a HOCK macro instruction, and control is | 
passed to the interrupted program via LPSW. | 
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Diagram 2.2 
Type-1 SVC Interruption Handling 


Input Processing Output 


SVC 
Int ti IEAQSCOO Se SS SS SS SS SS 
nterruption  aekseeny Control Register 1 | 


| SVC issuer's general Address of system 
| registers segment table 





Registers 0-15 


1 Enter DSS if DSS is active, 
Contents same as when ——s ct peaei ete BaGnt 
the interruption occurred. ~7T 


system 


---—— 2 Set segment table origin register and 
save the status of the interrupted task. 





SVC old PSW _— 3 Record the interruption if the trace 


| 
4 
location X'20! | option was selected. 
| 
| 
| 


CB 


TRSVC 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 





Tau 


TCBRBP _——_ Record the 
interruption, ah a ee _t 
———t+ 4 Request GTF to record the interruption. 2. ABTERM only 
Monitor Call 
program 


interruption 





location X'8A' Bf the SVC number is not in the 


SVCTABLE SVC table ABTERM 


Contains addresses of <= |EAOABO] 
user-supplied and 8.1] 
IBM-supplied SVC ; 


routines -——4 


L—-—_— 6 Test authorization for this SVC routine. TESTAUTH 


If invalid, terminate the task. IEFAVTEST 
20 Register 3 
] 


r- 
| 
I 
| 
SVC interruption code ——<——— 7 
| 
| 
Z| 


CVTPTR 


location X'1]Q! 7 Address of CVT 


Determine whether the SVC request can 
be processed now, and whether an 
SVRB must be constructed for it. Take 
J action as follows: 


Register 4 
Ly 


Address of current TCB 


| TA. If execution of the SVC routine Register 5 


. = : 
| must be deferred, branch to the 


» . aes by ae 
CVTSEGD 
Pe i ; Address of current RB 
CVTSYLK ees dispatcher. 
eas | oe } eaters 1 
17 
CVTTRACE — — Address of SVC entry 


7B. If no SVRB is needed, branch to A Type-1 SVC 


wis a : 
| ; 
CVTPSIC — ~4 the SVC routine. Rauaie 


Processes the SVC 


| 
| request, 
CVTPGSUP a tell 





3 
3 





| | 
| | 
| | 
| Register 7 | 
| |Address of IEASCSAV | 
| | 
| | 
| 


Register 12 
Address of IEAQTROO 





Tc, If an SVRB must be constructed, 
branch to the SVC SLIH. 





ea ean eae oe eee ee 
Register 14 





SVC SLIH 


IEAQT ROO 
Zi3 


Address of Type-1 


Exit routine 


Registers 0, 1, 13, 
and 15 


(Unchanged) 
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Diagram 2.2 Type-1 SVC Interrupticn Handling (Module IEAVNVOO0) 


an a eg Pr i eR cee eee ED gh Am RP tl Ey Doe a ee oe aw et SE gS ON eee eT a pe re ns 
[ROUTINE 


NOTES | NAME 


4 
1 The segment table register is set to the address of the |IEAQSCOO 
system segment table if it is not already set. | 


| 
LEAQTRCE| TRSVC 
| 


3 The Svc First-Level Interrupticn Handler (SVC FLIH) 
branches to CVTTRACE which contains either a BR it 
(return) or a BR 10 to TRSVC (if the trace ocrticn was 
selected). Control is returned to the SVC FLIH. 


| 

| 

t 

| 

| 

| 

| 

| 

| 

| 

| 

| 4 A Monitor Call instruction is issued (via the HOCK macro 
| instruction) for the SVC interruption class. If event 

| monitoring is in effect for the class, a program inter- 
| ruption results. (See Diagram 2.5.) 

| 

| § The SVC FLIH compares the SVC number (in the SVC ITEAQSC00| IGCERROR 
| interruption code) with the SVC table to see if the 

| number is valid for this system. When an SVC number is 
| less than the lowest user SVC number in the system or 
| higher than the highest IBM SVC number, the SVC FLIH 

| branches to ABTERM to schedule aknormal termination of 
| the task. 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


6 The Svc FLIH inspects the function code in the AFF 
table. If zero, processing continues at Step 7. Other- 
wise, the SVC FLIH checks whether the current task is in 
supervisor state or key 0. If it is, processing con- 
tinues at Step 7. If it is not, the SVC FLIH branches 
to the task supervision TESTAUTH routine to determine 
whether the SVC issuer is authorized for the requested 
functions. If TESTAUTH determines that the SVC issuer 


IEAVTEST 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

is not authorized for that SVC, the SVC FLIH branches to | 
ABTERM to schedule abnormal termination of the task. If | 
the SVC issuer is properly authorized, processing con- | 
tinues at Step 7. | 
| 

7 The svc FLIH checks control block fields to determine | 
its next action, as shown in the following table: 


IEAQSCOO 


hm a so a a a 


fos See Se ToS. SS 
| | | Svc Issued 

| | |by Paging 

| | | Supervisor? 

| | | (CVTPSIC=1 

| | Jor IEATCBth=a 
| | Supervisor |Paging Surf. 

| |Lock Set? | TCB) 

| Step| (CVTSYSLK=FF)|(CVTPGSUP) 
| 7A | yes | no 

| [ | 

| I | 

| | | 

| | | 

| | | 

| | | 

| | | 
|----+------------- ¢-—-------~--- 
| 7B | no | = 

| f------------- }+------------- 
| | yes | yes 

 iseaicrs (oa aon ae cin oars : uct an ca ioe sind 
| 7c | no | - 

| fea=—=5$--=S-- 7 a eacame ere 
| | yes | yes 

| -------------- #35552 =35==--= 
| | yes | = 
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Type-1 SVC?|in SVC? [Action Taken 
(IGCTYPE=0) 


| Interruptions 
| Enakled 


| CIGCABLE=-1) [by SVC FLIH _ 
no |Backs-up PSW in 
[RB so the SVC 
{instruction will 
|reexecute when 
jthe supervisor 
[lock is reset, 
J[and Eranches to 
|the dispatcher. 
= jBranches to 
—--—---------- 4{Type-1i SVC 
7 | routine. 
Ss |Branches to SVC 
------------- 4SLIH to con- 
aa |struct an SVRB 
—-~---------- {and to start the 
yes |SVc routine. 
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Register 4 
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Address of SVC entry 
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3.21 é 
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location X'BA’ 6 Exit to SVC routine. An SVC Routine é < 
\\\ TCBRBP 
Process the SVC. 3 e 
SVC number : /] 
aut TCBATT 


location X'8B' 





7 ~~ Enable interruptions. MO DESET 


IEAMO DBR 
3.21 


8 Page in the SVC routine. 
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Address of CVT 


[EAQPKOO 


Process page fault. 
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IEAQPKO0 


Process MO DESET 
SVC interruption. 
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Register 4 
Address of TCB 






Disable interruptions 
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Address of SVRB 


Return address SVC 3 
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, 1, 13, and 15 


Same as at interruption 
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Diagram 2.3 Handling Types 2, 3, and 4 SVC Interruptions (Modu 


We ae ee we ad ee Sg Ones Sy ba OER Pg ae Ng gas pie alte te ae 0 Danes are qe ea et 
|ROUTINE | 


x 
8 
i 


Pe ee i i 


le IEAVNVOO)} 


| NAME | LABEL 


co 
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Since the RB may not have a register save area, the SVC | 
SLIH moves the registers of the interrupted program to | 
the save area of the SVRB (REGRSAVE). Hereafter, if the| 
currently requested SVC routine causes a new SVC inter- | 
ruption, its register contents and old PSW will ke | 
stored in lower real storage without causing the origin-| 
al svc issuer's status to be lest. The SVC SLIH sets | 
RBSIZE to the number of doublewords in the SVRB, and | 
sets fields in RBSTAB and RBSTAB2 to indicate the RB is | 
a dynamic SVRB (this tells the Exit routine that the | 
SVRB can be freed). If the SVC is type-3 or type-4, the| 
SVC SLIH sets field RSTAB1 bit RETRSVRB. This bit is a | 
Signal tc contents supervision routines that, for loads | 
of an SVC subsequent to the first load, contents super- | 
vision must fill the RBCDE field with a pointer to the _ | 
CDE for that load. The RBCDE pointer will be used Ly | 
ABDUMP to determine the address and size of the SVC { 
module to include in the printed dump. This indicator | 
is necessary, Since, for loads of all SVC routines, the | 
Svc interruption handlers branch directly to the virtual| 
address of the SVC routine as indicated in the SVc table| 
(no CDEsS are examined and no RBCDE pointer is filled | 
in). Without special processing, ABDUMP would be unable| 
to distinguish between first and subsequent loads of an 
SVC routine and would in every case print out the first 
load. The SVC SLIH stores the SVRB address into TCBRBP 
and stores the previcus top RB address into RBLINK. 

Then, it sets TCEBATT=X‘'20" to prevent attention exits 
from being executed while the SVC routine is running. 
Then, the SVC SLIH sets the first word of the RB old PSW 
equal to the first word of the SVC new PSW to indicate 
that the SVC routine is key 0, supervisor state, with 
translation enabled. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
While enabled, the SVC SLIH refers to the first instruc-| 
tion of the SVC routine. This produces a program inter-| 
ruption that causes the SVC routine to be paged into | 
real storage. The SVC SLIH regains control when the | 
paging operation has been conpleted. | 
| 
| 
| 
| 
| 
| 
| 
| 
4 


If the SVC routine is to be entered disabled, the SVC 
SLIH issues a MOCESET Svc. If the system lock was set 
while paging was in process, the MODESET SVC is deferred 
by the SVC FLIH. The page containing the SVC routine 
must be retested to ensure that it is still in real 
storage. If it is nct, the page-in function (Step 7) is 
repeated. 


IFAQTROO 


nh 







Input 


External 
Interruption 
Registers 0-15 
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the interruption occurred ioc. Ne 


External old PSW 


location X'18' 


WAITTCB 
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TCBRBP 


TCB 





CVTPTR — — 


location X'10' 


Interruption code 


location X'96' 


Processing 
IEAQEX00 


1 Enter DSS if DSS is active. 


2 Set segment table origin register and 
save status of interrupted program, 


3 lf the current TCB is the system wait 
TCB 


4 Record the interruption, if the trace 
option was selected. 


5 Request GTF to record the interruption. 


6 Determine cause of the interruption: 


e@ Clock comparator or CPU timer 


e Operator key 


7 Store time-of-day value. 


Monitor Call 












Program FLIH 


GTF records the 


interruption. 
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Diagram 2.4 External Interruption Handling (Module IEAVNVO0O0) 
poco -- - $e +--+ 


NO 


The External First-Level Interruption Handler (External 
FLIH) first stores registers 14 and 15 in IEASAV; then 
it uses these registers to store registers 0 through 15 
into the TCBGRS field of the TCB whose address is in 
IEATCBP+4. It then stores the external old PSW in the 
current RB (RBOPSW). 


oo 


The External FLIH branches to CVTTRACE which contains 
either a BR 11 (return) or a BR 10 instructicn to the 
Trace routine (if tracing was selected during NIP). 
Control is returned to the External FLIH. 


BAS 


A Monitor Call (MC) instruction is issued via a HOOK 
macro instruction. The macro expansion generates the MC 
instruction with the class set to external interruption. 
This causes a program interruption if event monitoring 
for this class is in effect. (See Diagram 2.5.) 


or 


The External FLIH branches to the Timer SLIH if the 
interruption code is X‘'1004 (clock comparator) or if 
X‘1005" (CPU timer). It branches to the communications 
task external interruption handler if byte 135, bit 1, 
is one. Interruption codes other than these are 
ignored. 


Oo) 


7 The External FLIH stores the TOD clock value in 
SYSWSAVE so that the time required to process this 
interruption will not Le charged to the WAIT TCB. 
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Processing 


IEAQPKOO 
1 Enter DSS if DSS is active, 


2 Save general registers and set STOR to 
system segment table, 


3 If not a translation specification 
exception, 


G@ Abnormally terminate, or wait. 


ol 


6 If the interruption is a Monitor Call or 
GTF recursion. 


7 If second exit task is in control or i 


|IEAOABO1 


recursion is invalid 


8 Record the interruption. 


9 Ir paging supervisor was interrupted 


10 Determine which type of interruption 
occurred and proceed accordingly: 


e Page fault 
e@ Set System Mask 


e@ Segment translation exception; 


change to program check interruption. 


e@ Program check interruption 


11. If task switch is indicated, save PSW 
and registers. 


12 Return to the interrupted task. 


DSS 
as Dynamic support 
system 


> 5 


Schedule abnormal 
termination or wait. 


| IEAPSER 


5,54 


Enable dynamic address translation, RRXRRRRRRREREREREERERERESRERRGERER’ SSS \ 





IEAGTF 
a Process Monitor Call 
or GTF recursion, 





CVTT RACE 


TRPI 


Record program 


interruption, 


2.10 





PAGEHOOK 


Put system in 
disabled wait state 


2.6, Step 1 
2.7, Step 1 


2.8, Step | 


IEAODS 


Dispatch the next 
task. 
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To Interrupted Task 
via LPSW 


¢ Diagram 2.5 
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e Diagram 2.5 Program Interruption Handling (Module IEAVNV00) 
a aa a a aaa a a aaa aa aa =7 


+ 
The program new PSW contains the address of IEAQPKOO and| 


is set to supervisor state, protection key 0, with I/0 | 
and external interruptions disabled, and dynamic address | 
translation inhibited. The general registers are the 
Same as when the interruption occurred. 


| 
| 
The Program Interruption Handler (Program FLIH) is | 
entered at IEAQPKOO whenever the CPU detects any of the | 
hexadecimal interrupticn codes 0-18, 40, and 80. The | 
processing performed is determined by these codes. The | 
first function performed is saving the register contents| 
in a special save area in lower real storage IEAPKSAV | 
(no base register is needed, so no register contents are| 
destroyed). | 
| 
| 
| 
| 
| 
| 
| 
| 


The Program FLIH ensures that the CVT pointer at x'10° 
is correct. 


The Program FLIH branches to the paging supervisor 
error routine with register 0, kits 14 and 15, set to 
zero if the error is minor (program old PSW # key 0) or 
with register 0, bits 14 and 15, set to zero if the 
error is major (indicating that the operating system was| 
in control at the time of the failure). For both major | 
and minor errors, register 1, bytes 3 and 4 = X'0001" to| 
indicate entry from the Program FLIH. For minor errors, | 
Program FLIH enables translation exceptions, and the | 
paging supervisor tries to recover. The Program FLIH | 
regains control only if the error is minor. For major | 
errors, the paging supervisor places the system ina | 
disabled wait state. | 
4 


IEAQPKOO 


IEAQPK00| 
IEAPSER |PISPEC 
| 


rh 
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the GTF routine if the | 
X"4O" (indicating a Monitor | 
CVTSTATE flag is on (indi- 
a previous Monitor Call). 


The Program FLIH branches to 
program interruption code is 
Call interruption) or if the 
cating GTF is in process for 
GTF returns to the Program FLIH only if the recursion 
cannot be handled. Normally, GTF returns directly to 
the interrupted routine or to the dispatcher. 

If CVTSEIC = 1, a second exit routine is in control. 
There can be no valid program interruptions cther than 
MC interruptions in second exit routines. The Program 
FLIH recursion flag tested is in IEAVPIRF. The ABTERM 
Prologue 1 routine is used to terminate the current 
task. 


The Program FLIH restores registers 0, 1, and 15 and 
branches to CVTTRACE. 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 
If PVTPGMCK=0 the paging supervisor was in control when | 
the program interruption occurred. PFLIH exits to the | 
PAGEHOOK routine of the paging supervisor which puts the| 
system in a disabled wait state. | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

[ 

| 
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Program interruption codes: xX‘'0011'=page fault; X‘0013' 
=SSM; X'0010'=segment translation exception (changed to 
X'0004'=protection violation program check). 


A task switch is indicated when TCBABTRM is set or when 
the current TCB equals the new TCB (IEATCBP=IEATCBP+4). 
The Program FLIH saves registers in the TCB and the old 
PSW in the RB. 


The appropriate segment takle address is placed in 
control register 1, general registers are restored, and 
control is returned directly to the interrupted routine 
via LPSW of the program old PSW. 
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Diagram 2.6 SSM Interruption Processing (Module IEAVNV00) 


rr rr rn 


1 A branch instruction is issued for the SSM class via a 
HOOK macro instruction. If event monitoring for that 
class is not in effect, the hocking routine returns. 


2 The Program FLIH obtains the address of the instruction 
that caused the interruption by kLacking up the next 
sequential instruction address (NSI) portion of the old 
PSW by the instruction length (ILC). It then adds the 
base (bits 0-3 of byte 2) and displacement specified in 
the instruction. (If the base register is zero, the 
base value is zero. Otherwise, the register contents 
are obtained from IEAPKSAV.) The Program FLIH then 
tests the operation code to determine whether the inter- 
ruption was caused by direct issuance of the SSM 
instruction, or by the EXECUTE instruction. If this is 
an EXECUTE instructicn, the kase and displacement sum is 
the address of the SSM instruction, and the abcve froce-— 
dure is repeated to obtain the mask. When the SSM 
instruction is found, the Progran FLIH adds the index 
register value to the base/displacement sum to obtain 
the address of the mask. 
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| 3. A Load Real Address instruction is used to determine 

| whether the SSM operand is in real storage. If the mask 
| is not in real storage, the Program FLIH creates a 

| pseudo-page fault and Eranches to the paging supervisor 
| program interruption extension (IEAPIX). If the return 
| code from IEAPIX is 0 (indicating that paging I/0 is 

| required), the program old PSW is reset to be reexecuted 
| after the paging oferation is completed. The request is 
| treated as a page fault. However, if the page is 

| reclaimed, processing continues at Step 4. 
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4 The old PSW system mask is changed if it is not already 
equal to the SSM operand and if the superviscr lcck is 
off (or if the paging task is the current task). If 
these conditions are in effect, bits 6 and 7 of the SSM 
operand are used to replace Ltits 6 and 7 of the user's 
old PSW. These bits regulate I/O and external interrup- 
tions. Otherwise, processing continues at Step 5. 


5 The RB is set nondispatchable (RBSLOCK=1) and the 
program old PSW NSI is backed up by the length in the 
ILC so that it points to the instruction that caused the 
interruption. 


6 The recursion flag is set, the new TCB address is set 
to zero to force a task switch, the program old FSW is 
stored in the RBOPSW field, the register contents in 
IEAPKSAV are moved into the current TCB (TCBGRS), and 


control is passed to the dispatcher. 
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¢ Diagram 2.7 
Page Fault Processing 


From Diagram 2.5 Step 10 
to process page faults 


Input Processing 


[EAPKSAV 


Interrupted 
ne —S 1. Determine whether user has a valid 


SPIE exit routine and if so, process 


2.8, Step 2 


like a program check. 






Output to Dispatcher 


Program Old PSW 


Return address 


IEAPKSAV 


Program Interruption 
Handler status 


DPF Save Area 






Interface with paging 
supervisor, 


2 Try to relaim page. 






2.9 






Program interruption code 


focation X'BE! 


2.9, Step 11 


3 Dispatch next task if interrupted routine 


TCB 
is enabled, 





| 
| 
| 
| 
| 
| 
=a If successful 
| 
| 
ee 


— IY 


| 
ioe 


TCBPIE =— 


a a ee 4 Soave status of system, BARRA BRRRBERRREREBEREEEEERERRERS ; 
aaa a 
status 
es ee 5 Ensure new and old TCB pointers are 


PIE 


PIEPICA 


| 
[Seeeeonere 


From dispatcher 
after paging I/O 
has completed for 
a Type-1 disabled 
page fault 


valid, and exit to the dispatcher, 


PITY TRET 


6 


If ABTERM has been scheduled 


2.5, Step 11 
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3.17 


Otherwise, restore type-] SVC status. 


From dispatcher 
after paging 1/O 
for a non-type-1 
disabled page fault 
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Sige deh el 
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status, 
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termination is scheduled, 3.17 
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Diagram 2.7 Page Fault Processing (Module IEAVNV00) 
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{ 1 If the program old PSW is in problem program state and 

| the extended PICA flag (TCBPIE17) is set in the TCB, the 
| Program FLIH ensures that the TCB points to a valid PIE 
| in real storage which points to a valid PICA also in 

| real storage. The PIE must not be in use for ancther 

| program interruption and the PICA must indicate that the 
| exit routine can process the page fault. 

| 

| LEAQPKOO | PIPIX 
| | 

| 3 After it has been determined that a page fault needs IEAQPKOO|PIPFIO 
| I/O processing, if the user is enakled, exit can be made. 
| directly to the dispatcher since the task switch and 

| status information are valid. However, if the user is 

| disabled, it is necessary to save the status of the sys- 
| tem at the time of the interruption. 
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4 The Program FLIH saves the program old PSW, ILC, and | LEAQPKOO|PIDFXIT 
registers at the time of the interruption in a special | 
save area (DPF save area). Then, it saves its own | 
register contents in IEAPKSAV, sets the program old PSW | 
to return to PIDPFRET, and, if it is a type-1 SVC rou- | 
tine that was interrupted, saves SVC registers, the SVC | 
oid PSW, ILC, and sets the program old PSW tc return to | 
| 
| 
| 
| 
| 
| 
| 
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°e Diagram 2.8 (Steps 1-7) 


Program-Check Interruption Handling 
From Diagram 2,5 Step 10 
to handle program -check 


Input interruptions Processing 


Program interruption code _ 


location X'8E' 


Monitor Call 





1 Record the interruption, 


JEAQPKOO 


Process MC 
Interruption 


SVRB 









Program 
Interruption 








~ RBUPR 
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a 2 If this is a translation specification 2.5, Step 11 
oy RbsExtended save: Ares exception and termination is scheduled 
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I 
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l 
=] If termination is not scheduled 2.5, Step 12 
| | 


Schedule abnormal 
termination. 


SS 3 if there is no SPIE exit routine, 


abnormally terminate. 






CB { 

Se | 8.1] 
TCBPIE — 4 Determine whether PIE can be used 

Se are and if not, free any temporary save 


area and abnormally terminate. | FREEMAIN 


RMBRANCH 
Free save area, 
5 Ensure PIE and PICA are in real storage. ey 8 
If they are go to Step 8. 
If not, create pseudo-page fault. IEAPIX 


6.1 
Page in PIE or PICA. 









PIEPICA 


5.46 
IEAPSAV 
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Interrupted routine's ioeecc he: 
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| e Go to Diagram 2.7 if the user is 
| disabled. 2.7, Step 4 
Program old PSW I e Get save area from user's LSQA, GETMAIN 
RMBRANCH 
Instruction length code | Geb storage tor Output to Dispatcher 







ne nes Page Fault Save Area 
Program old PSW, ILC, 
interruption code, 

registers of interrupted 
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e Save status and set program old 
PSW return address to PIPIERT. 
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Diagram 2.8 (Steps 1-7) Program-Check Interruption Handling 
Ga ee ee ar ay eh eg aT TY 5 mee Nae T os —T 


Go 
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|ROUTINE | 


| NAME | 


(Module IEAVNV00) 


LABEL | 


| IEAQPKO0| PIPROGTF | 


If the program interruption code is X'12' (translaticn | 
exception), no further processing is necessary and the _ | 
Program FLIH exits to the dispatcher for a task switch | 
or returns to the interrupted routine via LPSW. | 


If the interrupted routine is in problem program state, |IEAQPK00 


it is necessary to determine whether the user has speci-| 
fied a SPIE exit routine to handle this interruption. [ 
The TCBPIE field indicates this. If the interrurted 
routine is in supervisor state, a PIE may exist for an 
SVC routine. If so, field RBUPR is on and the PIE 
address is in the SVRB‘s extended save area. If there 
is no SPIE, the Program FLIH resets the Program FLIH 
recursion flag, and exits to the ABTERM Prologue routine 
to schedule abnormal termination of the interrupted 
routine. 


user is enabled, a test is made to determine whether 
there is a dynamic save area. If there is nct, RMBRANCH 
is used to acquire the save area from the user‘s LSQA. 
Following this, or if there already was a save area, 
status is saved as fcllows: the program Old PSW, ILC, 
interruption code, and the registers at the time of the 
interruption are saved, and the program old PSW in low 
storage is set to reenter the Program FLIH at PIPIERET 
in key 0, supervisor state, and disabled. The Program 
FLIH save area in low storage (IEAPSAV) is then set with| 
the current contents of Program FLIH's registers, the | 
interrupted routine's registers and PSW are noved to the| 
TCB and RB respectively, and control is passed to the | 
dispatcher. | 
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e Diagram 2.8 (Steps 8-12) 
Program-Check Interruption Handling 
From 2.8, Step 5 







Input Processing 
Program interruption code = FREEMAIN 
= 8 Release temporary save area if one 
X'8E Awichec RMBRANCH 


Free save area. 
6.1 





IEAQPLOO 


Schedule abnormal 
termination, 


= Q Abnormally terminate task if PICA 
cannot handle this kind of interruption. 


Output to SPIE routine 


PIE 


10 Move status of interrupted routine into Interrupted 
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routine's status 


8.11 











IEAPKSAV 
General registers at 
time of interruption 


Program old PSW 
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— — ———— 11 Change PSW to BC mode. AAVVAPRCABEBAEECERERARRBRRRRRBE’ 


12. Dispatch SPIE exit routine. 2.5, Step 10 
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Diagram 2.8 (Steps 8-12) Program-Check Interrupticn Handling (Module IEAVNVOO0) 
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9 Each interruption code has correspending bits in 
PICALTMK which indicate whether the interruption is to 


S$ exit routine. 


10 When it has Eeen determined that the interruption is to 


be handled by the user's 
"in use," registers 14-2 
PIE, tne program old PSW 
BC mode and saved in the 
SVC 3 (EXIT) instruction 
slot of the Program FLIH 


exit routine, the PIF is marked 
are moved from IEAPKSAV to the 
is reformatted from EC node to 
PIE, the address of a special 
is placed in the register 14 


to determine if the issuer is a SPIE exit routine), and 
the address of the exit routine is placed in the regist- 
er 15 slot and in the program old PSW. Following this, 


the program old PSW mask 


is set from the PICA pregrar 


mask, and, if this is for a page fault, the address of 
the page causing the interruption is saved in the 
register 0 slot of the Program FLIH save area. 


a re ee es es ee ee ee a es a ee oe ee 
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PIEPICA 








From program interruption 
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Diagram 2.9 
PIPIX Routine 


Processing 


Free temporary save area, 
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ee Ses RMBRANCH 
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ABTERM Prologue 


IEAOPLOO 


Output 


If |/O supervisor is in control, or the supervisor 
lock is on and program old PSW is disabled 


8.11 CVT 
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Set the supervisor lock, if PSW is disabled, and Seabees ee 


save the TCB address. IC AAAAN BARBRA BRREEEERGGGQE 
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Save status. 


Branch to paging supervisor; then restore status 


5,46 


To Calling Routine +0 
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If the page was not reclaimed and: 
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ABTERM Prologue 
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To Calling Routine +4 





Axzednsg uotjdnaraqur :z uotyqoas 


uOTST 


LS 


Diagram 2.9 PIPIX Routine (Module IEAVNV0O0) 
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[NAME 


2 Before exiting to the ABTERM Prologue routine, the 
Program FLIH turns off the Program FLIH recursion flag. 


The status must Le saved because the Program 
Interruption Handler Extension of the paging supervisor 
May cause a Monitor Call program interruption. 


6 If the return code from the paging supervisor is 0, 
PIPIX resets the "PIE/PICA prefixing flag" and, if the 
supervisor lock has keen set for this request, PIPIS 
sets the “inhibit second exits flag." 


8 If the requester owns the supervisor lock, PIPIX sets 
it. 


9 If the return code from the paging supervisor is 4, the 
page was reclaimed. PIPIX sets the “PIE/PICA frefixing 
flag" and returns control to the caller+t4. 
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1 Store the time in the next trace table 
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Store registers 0, 1, and 15 if caller 
is the External FLIH. 


Record old PSW ard convert it from 
EC mode to BC mode (for |/O 
interruptions, record device address) 


Set interruption trace code, 


Record CSW for |/O interruption. 


Record TQE flags and TCB address for 


external interruptions. 


and 15 for calls from SVC FLIH, 
Program FLIH, and dispatcher. 


8 Record page address for page faults. 
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Diagram 2.10 
Tracing Supervisor Interruptions 
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Diagram 2.10 Tracing Supervisor Interruptions (Module IEAQTRCF) 
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The address of the next trace takle entry address is 
equal to TRPTR+32 if that value is less than TREND (the 
final entry). If TRPTR+32 eguals or exceeds TREND, 


TRPTR is changed to equal TRBEG (the beginning address). 


Bits 2-5 of the time-of-day value (time stamp) are 
copied into the last four bits of the next trace takle 
entry. 


The ECTOBC subroutine is used to convert the PSW fror 
EC mode to EC wmode for all but I/O interruptions. For 
I/O interruptions, TRIO converts the I/0 old PSW and 
replaces the instruction address field with the I/0 
channel and device address. 


The trace code is set by either TRDISP, TREX, TRIO, 
TRPI, or TRSVC, whichever was called to record the par- 
ticular event. 


If the external interruption code is X'1004', the clock 
comparator caused the interruption. If the code is 
X'1005", the CPU timer caused the interrupticn. The 
flags of the appropriate TQE are recorded in the trace 
table entry. 


The TRDISP subroutine stores registers 0, 1, and 15 
contained in the new TCB for calls from the dispatcher. 
For SVC and program interruptions, the current TCB and 
current registers 0, 1, and 15 are recorded. 


The address of the page fault or segment translation 
exception is stored in the trace table entry. 
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Register 9 | 





Condition code _o-— Record the device address 


and condition code. 


Register 10 TCB address 


CAW 


Address of TRSIO Record the CAW and CSW. 
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Return To I/O supervisor 
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Ss 


Task supervision controls the execution 
of tasks and allocates CPU time to compet- 
ing tasks. Diagram 3.1 shows the routines 
that make up task supervision. 


Task supervision routines that are type- 
1 and type-2 SVC routines provide services 
that can be requested by problem programs 
Or system programs by issuing a macro 
instruction (for example, ATTACH). The 
routines that are not shown as type-1 or 
type-2 SVCs are entered directly by other 
system routines. 


A task is described by a TCE (task con- 
trol block). The TCB contains information 
needed to control the execution of the task 
(see the description of the TCB in Section 
12). 


There are two types of tasks: permanent 
tasks and dynamic tasks. Each task is 
represented by one TCB with chaining fields 
that form two TCB queues: the task queue, 
which includes all active tasks in the sys- 
tem, and the subtask queve for the job 
step. (These queues are described under 
"The Two TCB Queues" later in this section. 


Permanent Tasks 


When the operating system is generated, 
the TCBs for the permanent system tasks are 
built into the nucleus. These TCBs are the 
beginning of the task queue (see Figure 
3-1). 


Dynamic Tasks 


Dynamic tasks are created by task super- 
vision in response to a system or user 
ATTACH request. When the ATTACH routine 
creates a task, it builds the TCB that 
represents the task usually in the LSQA 
(local system queue area) of the requester. 
But if the LSQA operand is specified in the 
ATTACH request, the ATTACH routine places 
the TCB and other control blocks associated 
with the task in a new LSQA for the new 
subtask. 


CREATING A TASK 


The following is the basic sequence of 
task creation: The master scheduler, which 
is a permanent task, attaches an initiator/ 
terminator task, which is a job management 
task. Initiator/terminator tasks attach 
job-step tasks, which in turn attach 
subtasks. 


The advantage of suktasking is that sub- 
tasks compete for the use of the CPU when 
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Communications 
Vector Table 









|IEATCBI 
IEAERTCB 
|EADSTCB 


Paging Supervisor TCB 












CVTHEAD IEAHEAD System Error TCB 


Dynamic Support 
System TCB 





Communications Task 


TCB 


|IEECVTCB 
IGFRMTCB 





Dynamic Device 
Reconfiguration TCB 


Master Scheduler TCB 


Note: The TCBs are queued in descending order according to dispatching 
priority. 


Permanent TCBs that form the 
beginning of the task queue. 


Figure 3-1. 


either the job-step task or one of its subk- 
tasks must wait. When a job-step task that 
uses subtasking must wait, it is not neces- 
Sarily another job ster that gains control. 


THE TWO TCB QUEUES 


The ATTACH routine establishes pointers 
in a new TCB in such a way that the TCB 
kecomes part of two TCE queues: the task 
gueue, and the subtask queue for a job 
step. 


The task queue contains all TCBs in the 
system. On this queue, the TCBs are 
chained in a descending order of priority, 
with the permanent system tasks having the 
highest positions on the queue. The CHAP 
routine manipulates this queue when it 
changes the dispatching priorities of 
tasks, and the dispatcher tests the TCBs on 
this queue to determine which task should 
be dispatched next. 


There is a subtask queue for each job 
step in the system. The subtask queue 
starts with the job-step TCB and contains a 
TCB for each task attached by the jok-step 
task or cne of its subtasks. The TCBs on 
this queue show the order in which the TCBs 
for the job step were created. The ter- 
mination routines use the subtask queue to 
determine the sequence for freeing the job 
step*s resources when the job ster is 
abnormally terminated. 
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TCB Pointers 


The relationship of tasks on the task 
queue is indicated by two chaining fields: 
e TCBTCB -- Points to the TCB for the 
next lower priority task on 

the task queue. 


e TCBBACK -- Points to the TCB for the 
next higher priority task on 
the task queue. 


The relationship of subtasks on a subtask 
queue is indicated by four chaining fields: 


e TCBOTC -~ Points to the TCB for the 
task that attached this 
subtask. 

e TCBLTC -- Points to the TCB for the 
task last attached by this 
task. 

e TCBNTC -- Points to the TCB for the 


task previously attached by 
the task that attached this 
task. 


e TCBJSTCB 


Points to the first TCB for 
the job step. 


Figure 3-2 shows a subtask queue. In 
the figure, task 0 is a job-step task and 
has two subtasks, tasks 1 and 2. Task 1 
was attached first. Task 2 has one sub- 
task, task 3. 


ALLOCATING CPU TIME TO COMPETING TASKS 


The dispatcher determines which task is 
to be dispatched next and passes control to 
the current routine of that task. The task 
to be dispatched next is one of the 
following: 


e The current task, whose performance is 
being resumed. 


e Another ready task of higher priority 
than the current task. 


e Another ready task of lower priority 
than the current task, if the current 
task is waiting or is nondispatchable. 


e Another task in the same time-sliced 
group. 


e Another task in the APG. 


The interrupted routine of the current 
task is given control if no supervisor rou- 
tine has indicated the need for a task 
switch. If a task switch has been indi- 
cated, however, the dispatcher gives con- 
trol to the current routine of the highest 
priority ready task. This task may be of 
higher or lower priority than the current 
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Figure 3-2. Example of a subtask queue 
showing how TCB pointers link 


a subtask to related subtasks. 


task. The address of the “new" task*s TCB 
is found either in the NEW TCB pointer 
(IEATCBF), or through a search of the task 
gueue. 


If the dispatcher does not find a rou- 
tine that can be dispatched, it dispatches 
a dummy task which is part of the nucleus. 
The dummy task has no associated routines 
and places the CPU in an enabled wait 
state. After a future interruption, one of 
the nonready tasks may be readied ky an 
interruption handler, and CPU execution can 
continue. 


In addition, the dispatcher handles task 
and jok-step timing. One or more priority 
levels may have been identified as time- 
Sliced groups. For tasks within these 
groups, the dispatcher determines which 
time-sliced task is to receive control next 
and dispatches the task with the time 
interval identified for that group. 


A single priority level may be identi- 
fied at system generation or system initia- 
lization time as an APG (automatic priority 
group). (A time-slicing group cannot tLe 
identified as an automatic priority group.) 
Tasks within an automatic friority group 
are dispatched in a way that makes best use 
of the system's CPU and I/O resources. 


The APG tasks constitute a subset of the 
entire task queue. In addition, the APG is 
divided into two subgrourgs as shown in 
Figure 3-3. 


- 


- 


C 





Rea ee aD ee 
\/O CPU 
Subgroup Subgroup 


Figure 3-3. Portion of the task queue 
Showing two subgroups in an 


automatic priority group. 


Note that the VS2 dispatcher operates 
with a priority-ordered task queue. A 
search of the task queue proceeds from left 
to right. Tasks that the CHAP or ATTACH 
service routines place in the APG are 
marked as I/O-oriented tasks and are queued 
at the head of the APG section of the 
queue. This permits prompt identification 
of the characteristics of new APG tasks. 
The Task Switch routine signals task 
Switches between APG tasks only when the 
current task is a CPU-oriented task and the 
contending task is an I/0-oriented task. 
This eliminates unnecessary task switching 
overhead between APG tasks that have essen- 
tially the same characteristics. 


Tasks are dispatched and shifted within 
the APG according to their characteristics. 
Tasks are considered to be CPU-oriented if 
they utilize their entire time interval 
without voluntarily relinquishing control 
of the CPU. (A task may be CPU-oriented 
even if it uses more I/O time than CPU 
time.) Tasks are I/O-oriented if they seem 
to involve more use of I/O (paging I/O is 
excluded from this determination). 


All tasks in the APG are dispatched with 
a timed interval. The decision on whether 
a task is I/O-oriented is based on whether 
the task uses its entire interval of 
allotted time. Unused portions of the 
interval are moved when page faults stop a 
task or a task is preempted by higher 
priority tasks. 


Important features of the APG group are: 


e Tasks within the I/O subgroup are 
arranged in such a way that those using 
smaller portions of their interval are 
ranked higher in the queue. 


e CPU tasks receive control in a cyclic 
Manner, thus ensuring that any avail- 
able CPU time is distributed equitably 
among them. This ensures that through- 
put time for CPU-oriented tasks is in 
proportion to their stand-alone run 
time. In addition, potential I/O tasks 
are not kept at the kottom of the CPU 
Subgroup indefinitely. 


The algorithm that governs the selection 
and dispatching of APG tasks is kased on 
the information in Figure 3-4. The follow- 
ing are the self-adjusting characteristics 
and parameters associated with the VS2 
dispatcher: 


1. The original time interval that is 
assigned to APG tasks. 


2. An incremental time that can ke added 
or suktracted from the original time 
interval. 


3. A lower limit on the adjusted time 
interval. 


4G. An upper limit on the adjusted time 
interval. 


5. A predetermined value expressing the 
desired ratio of X to Y, where X = 
total number of times APG tasks used 
their full time interval, and Y = sum 
of X and total number of times APG 
tasks voluntarily surrendered CPU con- 
trol. (Notes: xX and Y are reset to 0 
at the end of each statistics 
interval.) 


6. A statistics interval used to deter- 
mine the frequency with which the dis- 
patching algorithm adjusts itself. 


Parameters 2 through 6 can be specified at 
System generation or system initialization. 
The initial value of parameter 1 is: 


(upper limit + lower limit) - 2 


Throughout a statistics interval, all APG 
tasks are dispatched with the same time 
interval. Counts are kept of the X and Y 
values. When the statistics interval con- 
cludes, the ratio of X to Y is computed and 
compared to the value of parameter 5. If 
the calculated value is lower, the resolu- 
tion of the algorithm is not adequate to 
detect enough CPU-oriented tasks. Accor- 
dingly, the current value of parameter 1 is 
decreased by the magnitude of parameter 2. 
Conversely, if too few I/0-oriented tasks 
are being identified by the algorithm, the 
value of parameter 1 is increased. 


SUMMARY OF TASK SUPERVISION 


In summary, the ATTACH routine of task 
supervision creates TCBs for all but fer- 
Manent system tasks. After it queues these 
TCBs, other task supervision routines main- 
tain the status of all tasks in the systen. 
A short summary of each routine accompanies 
the diagrams, which follow. 
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Reason for 


| 
| Loss of 
| CPU Control 


Original Task Status - I/0 
Preemption by task above the APG 


Time interval end 


Voluntary surrender 


Original Task Status - CPU 


Preemption by I/0 task or by 
task above the APG. 


Time interval end 


Voluntary surrender 
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Action Taken 


Save unused portion of interval; pass 
control to preempting task. 


Set up full interval for next dispatch of 
task; mark task CPU-oriented and queue at 
top of CPU subgroup; locate next task by 
searching from top of APG. 


Set up full interval for next dispatch of 
task; queue task within I/O subgroup 
based on portion of interval used; locate 
next task by searching from top of APG. 


Save unused portion of interval; pass 
control to preempting task. 


Set up full interval for next dispatch of 
task; queue task at end of CPU subgroup; 
locate next task by searching from top of 
CPU subgroup. 


Set up full interval for next dispatch of 
task; queue task at end of I/O subgroup 
and mark task I/0O-oriented; locate next 
task by searching from top of CPU 
subgroup. 


Figure 3-4. Factors in the dispatching of APG tasks. 
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ATTACH 
Routine 


DEQ 
Routine 


Index to Diagrams by Module 
Name for Task Supervision 


Name Number(s) 
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IEAVSETS 


IEAVSY50 


IEAVT BOO 3.4, 3.6 





Routine 









Stage 1 Exit 
Effector 









EXTRACT 
Routine 


Stage 2 Exit 
Effector 


STATUS 


Routine 









Overview of Task 
Supervision 









DETACH 
Routine 





Stage 3 Exit 
Effector 








Validity Check 


Routine 








SPIE 


Routine 





Exit 
Routine 


TESTAUTH 
Routine 













WAIT 


Routine 








Type-1 Exit 


Routine 


MODESET 


Routine 









e Diagram 3.0 
Task Supervision 
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POST 
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System Task 
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System Error Task 
3.22 
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TYPE-1 SVC ROUTINES Type-1 Exit Routine 


WAIT Routine 
3.7 


Suspends task execution pending an event. 


Stage 1 Exit Effector 
3.11 


Begins the scheduling of an asynchronous 
exit routine, 


3.15 


Handles the return from type-1 SVC 
routines. 


Caller issues a macro 


instruction 









SVC First-Level 


Interruption Handler 


2.2 STATUS Routine 
3.18 


Adjusts task dispatchability. 


TESTAUTH Routine 
3.20 


Tests authorization. 


MODESET Routine 
3.21 Exit Routine 


Adjusts the system mask. 3.14 


Handles exiting procedures for programs 
other than type-1 SVCs (Exit is a type-I 
SVC) . 



































SVC Second-Level 
Interruption Handler 


2.3 


TYPE-2 SVC ROUTINES 
ATTACH Routine 





3.2 


Creates a subtask 


CHAP Routine 










3.3 


Changes task priority 


EXTRACT Routine 
3.4 


Supplies control block information 


DETACH Routine 
3.5 


Eliminates a task 


SPIE Routine 
3.6 
Specifies an exit routine to be entered 
following a program check. 
POST Routine 
3.8 


The Stage 2 and 3 Exit Effectors 
3.11 


Schedule asynchronous exit routines 


Validity Check Routine 
3.19 





















Verifies storage addresses 


Task Switch Routine 
3.16 
Compares dispatching priorities for a 
possible task switch. 





Reschedules task execution following 
occurrence of an awaited event, 





ENQ@ Routine 
3.9 


Serializes use of symbolically named 
resources 


DEQ Routine 
3.10 


Frees resources (requested through ENQ) 
no longer needed. 






System Task ABEND Recovery (STAR) Exit 





Routine of the System Error Task 








3.22 


Readies the system error task after it fails. 






e Diagram 3.1 
Overview of Task Supervision 


Dispatcher 


Paes 
Selects and passes control to ready tasks, 


Ready task, which may be 


the caller. 
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Diagram 3.2 (Steps 1-4) 
ATTACH Routine 
From SVC SLIH to 
process an ATTACH 
request 


Input Processing Output 


1GC042 
Register | 
spears aA oi 1 If ATTACH was issued by a caller Call 
le laa in a STAE exit routine aaniies Register 15 
list via SVC 3 egister 


2 Ensure that parameter list is in real Validity Check ABTERM X'04': ATTACH was issued in STAE 
Register 15 storage (for all callers) and is valid 


(for callers without a key of 0). IEAVLO1+4 aes terns 
Address of supervisor Test key and 
parameter list alignment 


IEAOA BOO was created. 


3.19 


MODESET Routine 





Register 1 


Completion code 


X'72A': Invalid parameter list. 


Register 4 







IEAVMODBR 
Enable to reference 
missing pages. 





3.21 


3 Enforce task structure rules. Caller 
via SVC 3 Register 15 


Ere SSS CRs, 


X'14': Attempt to attach a job-step 
task by a non-job-step task. 
No subtask created, 





X'18': Attempt to attach a job-step 
task when subtasks are not 
job steps, or to attach non- 
job-steps when subtasks are 





4 Ensure that the new subtask will have job steps. No subtask 
access to any specified STAI exit ae created. 
routines if it is abnormally 
terminated. Caller ; 
via SVC 3 Register 15 


SSS ted 


X'08': Insufficient storage to 
schedule the STAI exit 
routine. No subtask created. 


X'OC': The exit routine or parameter 
list for the STAI operand is 
invalid. No subtask created. 


(Continued at Step 5) 
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Diagram 3.2 (Steps 1-4) ATTACH Routine (Module IEAVATOO) 
(aes a eR ee ee eg ee ig ep ere ea Toe re cea oa 1 


| 
NOTES | 
The ATTACH routine fermits a proklem program or system | 
program to attach a subtask. The ATTACH routine creates a | 
TCB to represent the suktask, places control information in| 
the new TCB, allocates storage to the subtask, places the 
new TCB on the two TCB queues, and schedules linkage to 
contents Supervision to obtain the first program to he 
executed for the new suktask. When the new subtask has the 
highest priority among the ready tasks, the specified fro- 
gram is given control. 


Caller's with a key of 0 can specify the creation of one or 
more LSQA (local system queue area) segments to the TCB for 
the new subtask. This type of request is called ATTACH 
with LSQA. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
If the ATTACH macro instruction was issued with the STAI| 
operand, the ATTACH routine ensures that the new sub- | 
task will have access to the specified STAI exit routine| 
if the subtask is scheduled for abnormal termination. | 
The STAI operand has no effect on ATTACH with LSCA | 
requests. | 
| 
STAI exit routines perform the same functions for a sub-| 
task that a STAE exit routine performs. ATTACH issues a| 
STAI SVC to create a dummy SCB (STA control ktlock) which | 
points to the exit routine, and then queues it to the 
calling routine's TCR. (The new subtask's TCB does not 
yet exist.) 
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Register 1 


Address of problem 
program parameter 
list 


Register 15 


Address of supervisor 
parameter list 


Register 4 


Address of caller's 
TCB 





Diagram 3.2 (Steps 5-12) 
ATTACH Routine 


Processing 


5 


12 


For an ATTACH with LSQA request, 


obtain storage for the new subtask's 
LSQA and TCB. j GETMAIN Routine 





RMBRANCH Output 
6.1 
Error 
Caller ‘ 
via SVC 3 Register 15 


Ensure that when the new subtask ends, 
it has access to any end-of-task exit 
routines specified in the macro call 
(EXTR operand). Stage 1 Exit Effector 


IGCO43BR 

Obtain IRB, IQE, and 
TCB storage as 
necessary . 


X'1C': Attach with LSQA failed: 
no subtask created, 


3.11. 


Complete processing STAI exit routine 


(Begun at Step 4). GETMAIN Routine 


GMBRANCH 
Obtain storage for STAI 


SCB in SP 255. Register 15 


Storage for a STAI request is not 


6.1 


available for propagation of 
STAIs from the caller to the new 
subtask, No subtask created. 


ABTERM 


JEAOABOO 


Register | 


Completion code 


X'52A': Insufficient storage to 
propagate an SCB 
during an ATTACH 
without a STAI operand. 


8.12 








Obtain a TIRB for possible asynchronous 
processing for the new subtask, 








Stage | Exit Effector 
aaa IG CO43BR 
3.11 


Task Switch 


B. Transfer unchanged field from IEAODS02 
caller's TCB. 3.16 
Establish limit and dispatching priorities. 
Caller's TCB 
Add new subtask TCB to TCB task queue. 


Initialize the new subtask's TCB: 





TCB 





See "Section 12: Data Areas" for 
a description of the fields. 


A. Set fields based on supervisor 
parameter list. 
















Queue Relationships among a TCB, IQE, IRB, and 
End-of-Task Exit Routine 








al 


Subtask Queue: TCB's Belonging to Subtasks of the Caller’s Task 


Test for task switch, 


End-of-Task 
Exit Routine 





(Continued at Step 13) 
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Diagram 3.2 (Steps 5-12) ATTACH Routine (Module IEAVATOO) 
a a ce a a aa a a al 7 


| 
| NOTES [ 


~T 
[ROUTINE | 


NAME 


|LABEL | 


rc co $-------- $------ —-4 


6 At ETXR, ATTACH determines whether the requester has 
supplied the address of an asynchronous (end-of-task) 
exit routine. If so, ATTACH must get storage for and 
initialize an IRB and an ICE. 


*e An IRB (interruption request block) is used in 
scheduling an asynchronous exit routine. 


e An IQE (interrupticn queue element) represents a pend- 
ing request for the asynchronous exit routine. 


An IRB with the specified address may already exist 
because another task has requested the same asynchronous 
exit routine. In this case, ATTACH calls GETMAIN to get 
storage for an IQE, and uses the existing IRB. If no 
IRB exists, ATTACH calls the Stage 1 Exit Effectcr 
(CIRB) to build the IRB. 
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CIRB(IGCO43BR) (IGC043BR) RMBRANCH | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

L 


Without Exists RFEBRANCH RMBRANCH 
LSQA 


Without None exists CIRB CIRB 
LSQA CIRB 


7 ATTACH propagates to the new subtask's TCB. The STAI 
SCBs that were gueued to the calling routine'‘s TCB. 


If this is not an ATTACH with LSOQA, a dummy RB is 
presented to the Task Switch routine. This RB is ina 
ready state. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| Type of Status 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


ATTACH 


|KEYOTEST | 


| 
| ETXR 


HL 





Processing 


13 Prepare the ATTACH SVRB to be used as the 
RB for the new subtask. 


14 If an ECB for the new subtask has been specified, 
check its validity. 


15 Resolve storage and module ownership for the 
new subtask, 


16 Pass control to the LINK routine. 





Validity Check 


|EAOVLO1 
Test key and 


alignment. 


3.19 


ABTERM 


{EAOABOO 
8.12 


| ABTERM | ERM 





IEAOABOO 
8.12 





Step 2 


ee LOSES name one 


LINK Routine (4.2) 


Diagram 3.2 (Steps 13-16) 
ATTACH Routine 


Output 


Register 1 


Completion codes 


X'42A': An invalid ECB address 
was supplied. 















X'12A': An attempt was made to 
give a shared or owned 
subpool to the subtask. 


An attempt was made to 
give or share a 
supervisor subpool , 







An attempt was made to 
give the job pack area 

while it contained CDEs 
whose use count was not 


0, 
















Register 0 


Register 1 


Address of DCB 


Register 4 


Address of new TCB 
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Diagram 3.2 (Steps 13-16) ATTACH Routine (Module IEAVATOO) 
ag Nt eee a gy ee ] 
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| NOTES | 
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13 If this is an ATTACH with LSQA, ATTACH copies the reque- | 
ster's SVRB into the new subtask's LSQA, and frees the 
requester's SVRB. 


| 
| 
| 
| 
4 

115 The ATTACH routine allocates subpools to the new 

| subtask according to the input parameters. The GIVE 

| parameter causes allccation of subpools to the subtask 

| for its exclusive use. The SHARE farameter rfermits the 
| programs of the originating task and the programs of the 
| new subtask to share the same subpools. 

| 

| 

| 

| 

| 

| 

| 


ATTACH exits to the dispatcher, which allows any fposs- 
ible task switch to take place. When the new subtask is 
dispatched, processing resumes at Step 16. 


16 If a register save area is requested, 72 bytes are 
obtained from subpool 250. At NOSAVE, the registers 


are set up to pass control to contents supervisicn. 
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From SVC SLIH to 


process a CHAP request 


Processing 
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Note: Each TCBTCB field points to the 
TCB of next lower dispatching priority. 





Diagram 3.3 
CHAP Routine 


Output 


1GC044 


1 Ensure that input address is valid (for 
callers without a key of 0) and in real 
storage (all callers). 


Validity Check 


IEAOVLO1+4 
Test key and 


alignment. 
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ABEND 


IGCOOOTC 
8.14 





Register 1 


Completion Code 


X'22C': Address of TCB 
word is invalid, 

X'12C': No TCB could 
be found. 











MODESET Routine 
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Enable to reference 
missing pages 
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2 Find the specified TCB. 


3 Process change in priority for a TSO 
task: 


TCB 


8.14 


A. Compute new priority. 
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adjust time-slicing pointers. 
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task (TSO task already processed). BWBABeesWawa SS p eae 
> ength o 
4s | time-slice 
6 If task is moved into a time-slicing y é = 


group, adjust time-slicing pointers. 


LRBARREREEE! AUARUATERRER FUT 


4 TCB 
7 Set APG indicator if the task is being p 
d into the APG, LR BERERERAEEEEEER 
moved into the NANA Ones SRE 


iv, 

g 

g 

g 

8 Reorder task queue if necessary. g 


g 
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| Task Switch | Switch 


IEAQ DSO02 


QO Test for task switch. 


Cali a6 


via SVC 3 
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Diagram 3.3 CHAP Routine (Module IEAVCHO00) 


CS ee a eae en ee eee ee '--- >= Sa) Carona 1 aa ak a a a 2 arias Siar cs —1 
| | ROUTINE | | | |ROUTINE | | 
| NOTES |NAMF |LABEL | | NOTES | NAME | LABEL | 
Se to------- +-----~-- fs CRS se eee tee aap A 
| The CHAP routine permits a problem frogram or syster | CHAP |IGco44 | | 4 If TCBFTS = 1, the subject task is a memter of a time- [CHAP |TSTSBIT | 
| program to alter its dispatching priority or the dispatch- | | | | sliced group. TCBFTS iS set to 0, because a change in | | | 
| ing priority of one of its subtasks. The subtask must | | | | the dispatching priority shifts a time-Sliced task out | | | 
| belong to the issuer; that is, the suktask must have been | | | | of its group. | | | 
| attached by a routine belonging to the caller's task, and | | | | | | | 
| its TCB must therefore te on the caller's subtask queue. | | | | Pointers must be adjusted in the TSCE (time-slicing | | CHKTSCE | 
| | | | | control element) to reflect the change in priority. If | | | 
| A program issuing the CHAP macro instruction may change the| | | | the address of the TCB is the same as the address in the| | | 
| dispatching priority of a specified task to any value | | | | TSFIRST, TSNEXT, and TSLAST fields in the TSCE, all | | | 
| between 0 and the issuer's limit priority. The distinc- | | | | three fields are set equal to zero. | | | 
| tion between dispatching and linit friorities is as | | | | | | | 
| follows. | | | | Field Containing Meaning and CHAP | | | 
| | | | | TCB Address Processing | | | 
| Although both priorities are specified as parameters of the| | | | TSFIRST but not Specified task is not the only one | | | 
| ATTACH macro instruction, they serve different functions. | | | | TSLAST in the group. CHAP places address | | | 
| The dispatching priority determines the appropriate posi- | | | | of the next lower-level task on | | | 
| tion of a TCB in the task queue, and also the next routine | | | | task queue into TSFIRST. | | | 
| to be placed in execution by the dispatcher. The dispatch- | | | | | | | 
| er places in execution the current program having the ready| | | | TSLAST and TSNEXT Specified task is last in the group | | | 
| TCB with the highest dispatching priority. | | | | but not TSFIRST and next to ke dispatched. CHAP | | | 
| | | | | places address from TSFIRST into | | | 
| In contrast, the limit priority is used by the CHAP routine| | | | TSNEXT and address of next-higher- | | | 
| to determine the maximum value to which it may increase the| | | | level on the TCR queue into TSLAST. | | | 
| dispatching priority of the task. | | | | | | | 
| | | | | TSLAST but not CHAP places address of next higher-_ | | | 
| 1 If 0 is supplied in register 1, the dispatching | |OWNTCB | | TSNEXT level task TCB on task queue into | | | 
| priority of the caller is to be changed. The address of | | | | TSLAST. | | | 
| the caller's TCB was placed in register 4 the by Svc | | | | | | | 
[ Second-Level Interruption Handler (SLIH), and no validi-| | | | 5 When changing the dispatching priority of a non-TSO | | DOCHAP1 | 
| ty check of the address is required. | | | | task, CHAP follows the rules listed in the notes for | | | 
| | | | | step 3. For non-TSO tasks, the dispatching friority is | | | 
| 2 If a valid address is supplied in register 1, CHAP | |KEYTEST | | in field TCEDSP, and the limit priority is in field | | | 
| compares the specified TCB address with the addresses of | | | | TCBLMP. | | | 
| the TCBs that represent the caller's subtasks. If the | | | | | | | 
| subtask is not found, CHAP abnormally terminates the | | | | 6 The pointers in the TSCE are set to accommodate the new | |CHK4TSP | 
| caller. | | | | TCB, which is pointed to by TSLAST. If this is the only| | | 
| | | | | task in the group, TSFIRST and TSNEXT must also foint to| | | 
| The CHAP routine does not make this test if the caller's| | | | the new task. | | | 
| TCB (address in register 4) is the subject. | | | | | | | 
| | | | | 8 The TCB is queued according to its dispatching priority, | | LOCPLACE | 
| 3 If the priority of a TSO task (TCBTSTSK =1) is being | |DOCHAP | | but at the end of its priority level. There are two | | | 
| adjusted, only TSO tasks within the requester's suk- | | | | exceptions: (1) a new APG task is marked I/C and queued | | | 
| group, as specified ky the TJBX (time sharing job block | |TSTASK | | at the top of its priority level, and (2) any non-TSC | | | 
| extension) can be affected by the CHAP request. | | | | tasks with a priority of zero are queued ahead of TSO | | | 
| | | | | tasks with a priority of zero. | | | 
| The TCB fields that CHAP changes are TCBTSDP, contain- | | | bo Sea ess = - SSeS Se SS ee a a a SS SSS ti 2=ss-2> a ce 2 
| ing the dispatching priority; and TCBTSLP, containing | | | 

| the limit priority. The new priorities, shown relow in | | | 

| column 2, are determined by CHAP, which adds the number | | | 

| input in register 0 to the current priority to oftain | | | 

| the new total. | | | 

| | | | 

| Priority Requested New-Priorities | |ISXREST | 

| Total < 0 ICBTSDP = 0 | | | 

| | | | 

| Total > caller's TCBTSDP, TCBTSLP = | | | 

| TCBTSLP TCETSLP of caller | | | 

| | | | 

| Total < caller's TCBTSDP = total; if | | | 

| TCBTSDP 2 TCBTSLP, set | | | 

| TCBTSLP = new TCRTSDF | | | 

| | | | 

| If the priority of the LCGON task is set lower than any | | | 

| of the subtasks, the dispatching priority of these sub- | | | 

| tasks is set at the new level of the LOGON task. | | | 
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Input 


From SVC SLIH to process 
an EXTRACT request 


Processing 


IGC040 


Register | 
Validity Check 
Address of pe ee + 


Ensure that parameter list and answer 
IEAOVLO1+4 


area are in real storage and valid. 
fe Test key and alignment. 





parameter list 


Register 4 


Address of caller's 
TCB ae | 


IEAVMODBR 
Enable to reference 
missing pages. 


Parameter List 
Answer area address 
TCB address, or 0 


Extract 
field 


ABEND 


IGCO001C 
8.14 


Branch entry 
for disabled 
supervisor 

routines (no 


validity checking) 


Invalid EXTRACT 


IGCO40 + 8 
ee 


2 Determine whether the TCB address 


supplied is for a subtask or for its own Invalid TCB 
TCB 
_ 


TCB, 





Extract required information and place 
it in the answer area, 


Caller via SVC 3 








Diagram 3.4 
EXTRACT Routine 





Register 1 


Completion code 


X'128': Invalid answer 
area 
X'228': Invalid 


parameter list 


X'328': Invalid subtask 
specified 


Answer area (supplied by user) 


Requested fields 
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Diagram 3.4 EXTRACT Routine (Module IFAVTBOO) 


Ft pp ae ae te OP ee pa ety a ee ae ee Gt aye ape ge Pep Peete) CI RUE pte, om Ta ee 
| ROUTINE 


NOTES | 


The EXTRACT routine permits a proktlem program or system 
program to request information from its own TCE or the TCB 
of a subtask. Through the TCB, the JSCB (job step control 
block) and CSCB (command scheduling control block) can ke 
referred to and certain information can be extracted from 
these control blocks. The information taken from the TCB 
or subsidiary control block is stored in a caller-spfecified 
list in the caller's region. 


For non-kKey-0O caller's only, the input TCB address must 
match either the address of the caller's TCE or the 
address of a TCB representing one of the caller's 
subtasks. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
If the caller does not supply a TCE address, EXTRACT | 
uses the address of the caller's TCB, placed in register | 
4 by SVC SLIH. EXTRACT bypasses Step 2 if it uses the | 
register 4 address. | 
| 
| 
| 
| 
| 
| 
| 
| 
4 


EXTRACT tests each bit of the extract field in the 
parameter list. This field represents the FIELDS farar- 
eter of the EXTRACT macro instruction. (See OS/VS 
Supervisor Services and Macro Instructions for a 

list of the TCB fields that can be extracted.) For each 
bit set, EXTRACT copies appropriate information from 

the TCB into the answer area. 


NAME 


sc a a a a a ee ey 


08 


Input 


Register | 
Address of TCB 
to be detached 


X'00': Do not honor 
STAE exit. 
X'80': Honor STAE exit. 





Register 4 







Address of caller's TCB 


Caller's TCB 







TCBLTC 






os 


cars 





TCBFSA 
TCBOLSQA 


From SVC SLIH to process 


a DETACH request 









Diagram 3.5 (Steps 1-6) 
DETACH Routine 


Processing 


IGC062 
Validity Check 
1 Ensure that the TCB address is valid (for IEAVLKO1+4 


callers without a key of 0), and in real 


storage (all callers). Test key and alignment. 








3.19 
MODESET Routine 
JEAMO DBR 
Enable to reference 
missing pages. Output 
3.2] 
Invalid or ABEND 
Not found 
1GCOO01C Register | 
Completion code 
waa ane fc eee 
Not found X'23E': Not valid or 


0 address, or 
TCB not found, 


fa" ee 


Find TCB of subtask being detached. 


If this subtask has not completed 










execution a> 7 

Caller's TCB 
Dequeve the completed subtask's TCB by ae 
updating TCB pointers, ARABRRRARSEBVARASARRREEREE TCBLTC 5 

| 

FREEMAIN | 
Free problem program save area. RMBRANCH ae ae ia CB ICR 
Free TCB and LSQA segment(s) if TCB TCBNTC TCBNTC=0 
owns LSQA, or free TCB in subpool 253. naa 
Caller via SVC 3 
Register 15 


Return code 


X'00': Successful detach. 

X'04': Incomplete subtask 
detached, STAE exit 
of subtask allowed. 

X'08': LSQA segment could 
not be freed; subtask 
has been removed, 


(Continued at Step 7) 
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Diagram 3.5 (Steps 1-6) DETACH Routine (Module IEAVELCO2) 


r 


re a a a i a Se ee 


Pte weg aes See yl hee ba OE De ee oe tes Wah oy eee ST eee Jy pie A tay te any Sigh g Qa, Me ao ae ie gh a es 
| ROUTINE | 


NCTES | NAME | LABEL | 
The DETACH routine permits a progran being executed for 

an Originating task to detach its suktask if the subktask 
has been normally or abnormally terminated. The DETACH 
routine checks whether the address of the subtask's TCB 
passed to the DETACH routine is valid, and whether the sub- 
task has been terminated. It dequeues the subtask‘'s TCE 
from the subtask queue and frees storage areas relonging to 
the subtask, including the suktask's TCB. 


If the caller specifies an invalid TCB address, the DETACH 
routine abnormally terminates the caller's task. If the 
subtask has not been normally or abnormally terminated 
before the DETACH request, DETACH abnormally terminates it 
as part of its processing. 


1 Meaning of TCB fields referred to: 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 
TCBFC Equals 1 if the task has reen terminated. | 
TCBFSA Address of problem program save area. | 
TCBOLSQA Equals 1 if the suktask owns LSQGA segment(s). | 
TCBIQE Address of an IQE or zero. | 
TCBFA Equals 1 if the task is aknormally | 
terminating. | 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

L 


i) 


DETACH compares the input TCB address (in register 1) 
with the TCBs that represent the caller's suktasks 
until: 


e The TCB that represents the subtask to be detached is 
found, or 


*e DETACH finds a 0 in the TCBNTC field, and the 
specified TCB has not been found. 


c8 


Input 


Ret 
Seah 


Register ] 


Address of TCB 
to be detached 


X'00': Do not honor STA 


exit, 


X'80': Honor STA exit, 





Processing 


¢ = Bypass end-of-task exit routine; free 
control areas. 


8 If task is not already abnormally 
terminating, STA exit routine can 
execute if requester has allowed STA 
exit and if a STA exit exists, If 
task is abnormally terminating, go 
to step 10, 


Q Schedule abnormal termination for tasks 
not already abnormally terminating (no 


STA exit allowed). 


10 Wait for termination, then 


> 2 





|” | Free IGE, IRB, IRB 





| == FREEMAIN 


RMBRANCH 


save area, 


ABTERM 


IEAOABOO 







ABTERM 


IEAOABOO 


WAIT Routine 


1GCO001 


8.12 


> «X'93E':  Subtask scheduled 


8.12 


3.7 


Diagram 3.5 (Steps 7-10) 
DETACH Routine 


Output 






Register 1] 


[Completion code _| code 








for abnormal 
termination and STA 
exit allowed to 
execute (STA retry 
not allowed), 
X'13E': Subtask scheduled 
for abnormal 
termination. (STA 
exit not allowed), 
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Diagram 3.5 (Steps 7-10) DETACH Routine (Module IEAVEL02) 


C 


yo a a a ee ee ee Te eo a —1 
[ROUTINE | | 

| NOTES | NAME |LABEL | 
BiecGi aa ea sae e aS aaa Sa Se Sa ess ee eee ee ea eae ee ------—- 

| 8 If TCBIQE equals 0, then no ETXR exists. If the IRB |DETACH |CTABN | 
| use count is greater than 1, then the use count is | | | 
| decremented and the IRB is not freed. | | | 
| | | | 
19 [ |STATEST | 
| | | | 
110 | | TESTSCND | 
Le es a a eee Meee 5 ee ene 4 


18 


« Diagram 3.6 
SPIE Routine 


From SVC SLIH to process a 
SPIE request 


Input Processing 


Register | 1GC014 


New PICA address, or 0 = 1 Obtain storage for a PIE if a PIE does 


not already exist. If a PIE exists, go 
to Step 4. 


GETMAIN 


IGCO10 


Get 32 bytes from 
Register 4 


subpool 250. 





6.1 


Validity Check 


{EAOVLO1+4 
Test key and 


alignment. 


MODESET Routine 





Output 


2 Ensure that the PIE address is valid 
(for callers with a key of nonzero) 
and in real storage (all callers). 








IGC107 
Enable to reference 
missing page(s). 


3.21 


ABEND 


IGCOO001C 





Register 1 


Completion code 






i 
i 
I. 


X'20E': invalid PIE address. 


X'1OE': Invalid PICA 
address. 

X'30E’: Unauthorized 
requester for program 


check code 17. 


8.14 





—_—— — 3 Save the caller's program mask. 


Register | 

aoe ee Se Address of PICA, or 0 

4 if this is not the task's first SPIE, save 
PIEPICA the PICA address from the PIE for RB 


return to caller. 


L_____ —= 5 if the new PICA address equals 0, set 
the caller's PSW mask from TCBPMASK . 
Free the PIE. 











IGCO10 
Free 32 bytes from 


PICA subpool 250. 











Bs] PICAPRMK aga PICAEXT G Repeat Step 2 for PICA address. 6.1] 
— income 
aes 7 Set the mask in the caller's PSW with camaase 
_| the PICA mask. 
rca 
8 Set the extended PICA indicator for 
page faults if applicable. ABEND if cane 





unauthorized. 


TESTAUTH Routine 


IEAVTEST 
Test user's 
authorization. 


3.20 


oo 


** 





Q Save the new PICA address in the PIE. 


Caller via SVC 3 





2€ UWOTIZDaS 


nS ASSL 


uotstaizod 


S8 


eDiagram 3.6 SPIE Routine (Module IEAVTB00) 


a a a a a a a a ee 


formed by executable coding produced by the expansicn of 
the SPIE macro. This processing place a program mask, the 
address of the user's program-interrurption exit routine, 
and an interruption mask in the fields of the PICA. 


If, after the execution of the SPIE routine, a program- 
check interruption occurs in a program being executed for 
the issuer's task, the information in the PICA determines 
how the program interruption is to be processed. 


If an interruption occurs, the interruption supervisor 
stores in the PIE the information needed by the user's 
routine to handle the interruption. This information 

includes the program check old PSW and registers 14-2. 


exit 


For the interruption supervisor to pass control to the 
correct error handling routine, it must be able to test for 
the existence of a user routine. The main function of the 
SPIE routine is to place in the TCB of the macro-issuing 
program an indirect pointer to the user routine. If, after| 
a program-check interruption has occurred, the supervisor | 
finds an address in the pointer field, it passes control to| 
the user routine to handle the interruption. Otherwise, | 
the supervisor's Program Check FLIH schedules aknormal ter-| 
Mination of the task whose error caused the program 
interruption. 


a ee ee ae 


Sere ae ee ee eee a 
NOTES | 

The SPIE routine completes the processing needed for a 

user to specify a program interruption exit routine. The 

initial processing -- creating and initializing the fields 

of a PICA (program interruption control area) -- is per- 


Sethg pds ct BN Base ~T 
ROUTINE | 
NAME | 
+ 
SPIE | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
{ 
| 
| 
| 
| 
| 
| 
| 
{ 
| 
| 
| 
| 
a & 


LABEL | 


Me a ne re pe tig ge ee ee Pe ee Oy ig er faa Wee So ~T 


If the TCBPIE field equals 0, this is the first time | 
that the caller has issued a SPIE macro. A new PIE must| 
be built. 


For an already existing PIE, only the first word must be 
tested. 


If a PIE exists from the execution of an earlier SPIE, 
the PICA address it contains is returned to the caller 
in register 1. The caller may use this address ina 
later SPIE macro to restore this PICA. 


Whenever a caller issues a SPIE macro with nc 

operands, a zero PICA address results from the macro 
expansion. The saved program mask (TCBPMASK) is used to 
set the program mask in the caller's PSW. Thus, a SPIE 
macro with no operands cancels the effect of a previous 
SPIE macro. 


If the system is enakled at this point, processing must 
begin again at Step 2. 


If PICAEXT is not equal to zero, the TCBPIE17 brit is set 
equal to 1 if the user is authorized. 


The TCBPIE17 bit makes it possible to avoid inspection 
of the PIE and PICA every time a missing page interrup- 
tion occurs. The TCBPIE17 bit equals 1 if the user has 
provided an exit routine for this type of interruption. 


ee ee Ee ee 


[NAME 
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ROUTINE 


SPIE 
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From SVC SLIH to process 
a WAIT request 


Diagram 3.7 
WAIT Routine 


Input Processing 
IGCOO01 
Register 0 Caller 
1 If the specified wait count 
equals 0, return to the caller. Validity Check 


Register 1 


True form <= Address of 
ECB 


Complemented form -- 2 
Address of ECB list 


Address of RB for 
waiting program 








IEAOVLO1 


Test key and alignment, 
3.19 


_ MO DESET Routine 





Output 


Enable to reference 
Ensure that the specified ECB 


addresses are valid (for caller's 


missing pages. 





3.21 





without a key of zero) and in real For all ABENDs peoute) 
storage: (all:callen). Se 
Error 
ABTERM Invalid ECB address. 
Number of ECBs is 
IEAOABOO less than the wait 
8.12 count. 
Att t t t it 
If the number of ECBs is less than a arae es 
the wait count, abnormally terminate Error 
the caller. 
WARAA@deet ae aaaaaaaasaaaaaaaaanaagsaaan » 
Determine whether the requester 
should wait, and set the ECB wait bit (Aare he : 
if so, ease RH. 


« 


Se 


a SAAN N 
eee 


Indicate the need for a task switch 


NNN NN ANNAN 





Wea? 


ARANALAVABACEBERBRBRGH ATCO 
ama 


1EAQTEOO 


Apply a real time limit to the waiting 
task if possible. 


7.6 


Turn on the explicit wait bit for all 


but STIMER requesters. LRBRRaRaBaa my>(A)) 


To ready task via 
Type-1 Exit Routine 


Diagram 3.7 WAIT Routine (Module IEAVSY50) 
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CSS ee re ee ee .- 4 ehh a aie 1 Co eS ee rg ee ee 5 pelea aaa a ator 7 
| |ROUTINE | | | |ROUTINE | l 
| NOTES | NAME | LABEL | { NOTES | NAME pee 
}-----------~------------------------------------------------}-------- t--------{ 0 f---------------~--------------------=-------- == === === === f= === f === === -- 
| The WAIT routine permits a froklem program or system | WAIT J|Iccoo1 | : A time limit cannot Le applied if: | WALT | JSTIME 
| program to stop its execution until a specified numker cf | | | | | | 

| events have occurred, such as the completion of one or rore| | | | e A task in the subtask queue for the jok step is nct | | 

| I/O operations. When the specified events have occurred, | | | | waiting. ( | 

| the POST routine indicates the occurrence of the awaited | | | | | | 

| event or events and makes the program ready (no lcnger | | | | e The jok-step task has no higher level task | | 

| waiting), so that its execution can continue. | | | | (TCBOTC = 0). | | 

| | | { | 

| 3 The RBECBWT Fit in the caller‘*s RB is set when the | | ECBWT | e The task is a TSO task. | | 

| caller specifies a smaller wait count than number of | | | | | | 

| EBCs. This means that the caller awaits fewer events | | | | e The caller has a key of 0. { | 

| than the maximum number that can occur. For exanple, if| | | | | | 

| a WAIT request is fulfilled Ly the completion of one of | | | | e There is no initiator TQE. | | 

| three possible I/O operations, the wait bit set in each | | | | | | 

| of the two ECBs not yet rfosted is now misleading. If | | | | e There is a real jok-step TCE on the timer queue. | | 

| the RBECBWT bit is set, the POST routine clears the wait| | | | | | 

| bit in each of the ECBs not yet posted, and also clears | | | | e A task in the subtask queue for the job step has { | 

| the RBECBWT bit. The misleading indicators are thus | | | | issued a STIMER macro in its highest-level RB. | | 

| removed. | | | | | | 

| | | | | e WAIT has been called by the STIMER routine. | | 

| 4 Wait Decrease | | PKEY | [ | { 

| Event Flag Wait | | | | When STIMER issues a WAIT macro instruction, it is re-_ | | 

| Complete? Set  Ccunt Action | | [ | questing an interruption after a timed interval. It is | | 

| Yes NA =0 e Reset RBECBWT=0 and | | | | not necessary for the WAIT routine to place additional | { 

| clear wait flags in any | | | | time limits on the job step. A STIMER request is called| | 

| ECBs in the list. | | | | an implicit wait. | | 

| e Return via SVC 3. | | | | | | 

| | | | | Other calls to the WAIT routine are explicit requests. | | 

| Yes NA #0 e Continue frocessing ECBs. | | | | The RBXWAIT bit is set to indicate explicit requests. | | 

| e Go to Step 5 if this is | | | l___—-~--~---—~---—~---—_- -—-- -- -- + -- - -- +--+ - -- - - -- +--+ 4——-----—— 1--~~—- —_ 
| the last ECB. | | | 

| | | 

| No Yes NA e APTERM -- code X301. | | | 

| | | | 

| No No NA e Set ECB wait flag. | | | 

| e Put address of caller's | | | 

| RB in ECB for POST. | | | 

| e Continue processing | | | 

| FCBs. If this is the | ; | 

| last ECB, store wait | | 

[ count in RBWCF and go | | | 

| to Step 5. | 1 | 
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From SVC SLIH to process a POST 
request (at SVC entry point; see 


notes for branch entry points) 


Input 


Register Input (see table 

of "Registers on Entry and 
Exit" in Section 13 for 
register numbers for various 
entry points): 


One register 


Another register 


Address of ECB or 
parameter list for 
interregion posts 


Parameter List 
ECB address 
TJID address 
TCB address 


peal pe A eet 


Processing 


|GC002 


1° Ensure that referenced addresses are 
valid and in real storage, as necessary. 


2 Test interregion POST requests for 
authorization and validity. 


3 If the task being posted is not in an 
explicit wait, this is an invalid request. 


4 If the task has already been posted, exit. 


(Continued at Step 5) 


Validity Check 


IEAOVLO1 





4 Test key and alignment. 


| MODESET Routine _| DESET Routine 
1GC107 


Enable to reference 
missing pages. 





3.21 








IKJVAIOI 
(Time Sharing 
Interface Program) 


TESTAUTH Routine 


IEAVTEST 


Test user's 
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Diagram 3.8 (Steps 1-4) POST Routine (Module IEAVSY50) 


Ge or pee ee ee ee es es eee eee EI la ee eee ae eS Moa Gat “TT 
[ROUTINE | 


a nn i a i nn > 


NOTES | NAME 


The POST routine permits a program (the “posting” program 
or caller) to signal the occurrence of an event, such as 

the completion of an I/O operation, awaited by a waiting 

program. The routine signals (posts) the event's occur- 

rence by altering a bit in a specified ECB (event ccntrel 
block) shared by both the waiting and posting programs. 


The POST routine also places in the event control block a 
post code supplied by the posting frogram. The post code 
may later be inspected Ey the waiting program, after it 
resumes execution, to determine the type of event that 
occurred. The POST routine determines whether the program 
that is awaiting the posted event can be made ready (wheth- 
er all awaited events have occurred). 


If the waiting program can Le made ready, and belongs to a 
task of higher dispatching priority than that of the rfost- 
ing program, the POST rceutine indicates to the dispatcher 
that a task switch is needed (a ready program having higher 
priority than that of the caller should be dispatched). If 
a time limit has been arplied to the waiting task, it is 
removed. 


_" 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
After branch entries and interregion SVC entries (see | 
table below), POST returns contreol to the caller without | 
completing its processing if it iS necessary to enable | 
to bring the pages into storage. Before returning to | 
the caller, POST provides for an asynchronous reentry to| 
itself. It does this ky calling GETMAIN to get storage | 
for an SQE (supervisor queue element), initializing the | 
SQE, and calling the Stage 2 Exit Effector tc kLegin | 
scheduling the asynchronous reentry. This reentry will | 
accomplished under the task being posted. The Stage 2 | 
Exit Effector queues the SQE on an asynchronous exit | 
queue (see Diagram 3.9). | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
i 


Asynchronous reentry protects supervisor routines from 
time-consuming processing involved in ensuring that 
pages are in real storage. In addition, many of POST's 
callers could not tolerate an enakling of the system. 
With asynchronous reentry, the waiting routine, not the 
caller of POST, will incur the missing page 
interruption. 


NO 


If a TSO task is being fosted, the TJB is referenced 

to determine whether the user is in storage. For the 
active user, processing continues. If the task is 
Swapred out, an IPPB (interpartition POST block) is 
created, and the TSIP (Time sharing Interface Program) 
is called to bring the task into storage. POST is then 
called by the RCT (Region Control Task). 


|LABEL =| 
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| 
J 


06 


Diagram 3.8 (Steps 5-10) 
POST Routine 


Processing Output 


5 sif WAIT has not set the wait bit, set the 





complete bit and post code. BURA a Vaca aasaaaaaaaaaaaa 
Caller Ly 
6 lf the wait count is 0, the waiting task é 
is abnormally terminating. Set the g 
Somplerebitdnd Gorsende WRRRABRARA RULALAUUUURREPZ 
Caller Y 


V\ 


7 Decrease the wait count. If it is not y 
equal to 0, set the complete bit and 
post code. BRR BRA Ba asaa aaa»saasaanaaaannsa 


AAS RULUULBAAALUUYZ 


8 _siIf there are additional ECBs, set the 
complete bits in them, and the complete 
bit and post cade in the original ECB, 
Turn off the wait bits in all ECBs. MRRRREREEE’EEEGaS@ Gana aaaa: 


Q Remove any real time limits placed on Denvenelhoe tins 
the waiting task, = eh IEAQTDO1 
7.7 





Task Switch 


10 Test fora task switch. ac si IEAODSO? 
3.16 


Branch to caller 
for branch entries 


To caller via SVC 
3 for SVC entries 
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Liagram 3.2 (Steps 5-10) POST Routine (Module IEAVSY50) 


[oe SSS a SSeS Se anenS TT -2Ss5> SESS sH== 1 
| {ROUTINE | | 
| NOTES |NAME | LABEL | 
fg eee en et ee ee a a 
| 8 If processing of the ECL list causes the systein to be {POST | | 
| enabled, POST must begin again at Step l. | | | 
{ | | 
{10 On branch entries, PCST does not effect a task switch, | | | 
| even if one is indicated. Control returns to the call- | | | 
| er, and no task switch occurs until the dispatcher is | | | 
| entered again. | | { 
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Diagram 3.9 
ENQ Routine 


From SVC SLIH to 
process an ENQ request 


Input Processing 






1GC056 
Register | 1 Ensure that referenced addresses are Invalid requests 
Address of parameter valid and in real storage. ABEND 
list IGC0001C 
8.14 
List 
parameter Lis 2 if necessary, create the major and 


minor QCBs. 


Address of major name 
Address of minor name 


Major QCB 3 Create a QEL and place it on the QEL 
queue. 


Represents a set 


Output 


of resources 


Minor QCB 4 


lf the resource is available, return to 


the caller. Caller 

BE, The resource is not available: 
QEL 
for single resource 


Minor QCB 
Dispatcher (3.17) 
Step I 


e Place the caller in a wait state 


OR 





e Return control and indicate that 
the resource is not available. 





Caller via SVC 3 
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iagram 3.9 ENQ Routine (Module IEAVENQ1) 


The ENQ routine, working with the DEQ routine, rermits 
programs issuing the ENG macro instruction or the RESERVE 
macro instruction to gain control of a resource or set of 
resources. The requested resource may be one or more data 
sets, records within a data set, programs, or work areas 
Within storage. The symbolic name cf the resource, not the 
actual resource itself, is used by ENQ to control access. 


The ENQ routine places in a resource queue all resource 
requests specified in the caller's macro instruction. If 
no other ENQ-issuing program is using any of the requested 
resources, the ENQ routine, via the Exit routine and the 
dispatcher, returns control to the caller, which then gains 
access to its resource(s). But if any requested resource 
is already in use by another ENQ-issuing program, being 
executed for another task, the ENG routine may place the 
caller in a wait condition until the resource becomes 
available. 


N) 


ENQ searches the resource queues tc determine whether 
the requested resource is already in use. ENC searches 
the major QCB queue for a major QCB that contains the 
specified qname. If it finds the qname, at least one 
resource in the set of resources is in use, and the rou- 
tine then searches the associated minor CCB queue for 
the rname. 


If the requested resource is nct in use, as indicated 
by the absence of CCRs with the specified Qname and 
Rname, control is returned tc the caller. Depending on 
the input to the service routine, a return code may or 
may not be issued, and a QEL may or may not ke ccn- 
structed and placed on the resource queues. (Refer to 
Figure 3-5 for the various results.) 


aS 


p————— — — — —— — — H+ 
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ENDMAJ 
ENCMIN 


CREATQEL 


TESTEND 
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| 
NOTES l 


dicated by a major and minor QCB containing the resource | 
names, resultant processing depends on the particular | 
RET option that the caller has specified, on the tyre of| 
request -- shared (S) or exclusive (E)-- and on the 
types of QELS already on the queue. (Figure 3-6 lists 
the different forms of resultant processing.) 


Note in Figure 3-6 that a QEIL is constructed and placed 
on a QEL queue if the requester wants access to the 
resource and is willing to wait for it. The requester's 
willingness to wait for the resource is indicated Ly a 
RET option of HAVE, NONE, or the omission of the RET 
operand. The RET option of TEST never causes creaticn 
of a QEL (see Figure 3-7). If RET is USE, a QEL is 
created only if the requester can have immediate access 
to the resource. 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

Note that if all previous QELs on the queue and the fre-| 
sent request are both for "shared" resources, there is_ | 
no need for the caller to wait. The new requester and | 
those represented by the “shared™ previous QFIs cn the _ | 
queue may share the resource on a task-priority kasis. | 
Thus, a requester need not have its QEL at the tcp of | 
the “shared” group of QEFLs. Any requester represented _ | 
in the shared group may be executed if other requesters | 
represented in the group are waiting for an event, such | 
as an I/C completion, provided at least cne nenter of | 
the group is at the top of the queue. Control is | 
returned to the caller if the requested resource or | 
resources are availakle, or to the current routine of | 
the next highest priority ready task if the caller rust | 
wait because the requested resource is in use. If the | 
caller is to receive ccntrol, the return path is via the| 
Exit routine and the dispatcher. But if the current | 
routine of another task is to receive control, the | 
return path is via the dispatcher only. To determine | 
the appropriate return path, ENQ tests the RE wait ccunt| 
field in the current SVRB. If the RB wait count is 0, | 
all requested resources are available and the caller can| 
receive control. Rut if the RB wait count is greater | 
than 0, the caller is effectively in a wait condition | 
and cannot ke given control. | 
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ROUTINE 
NAME 


ENQ 


5 If another requester has access to the resource, as in- | 
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Parameter 


+ 
| 
| 
| 
| 
| Meaning cf RET 
l 
4 


Tests the queues to 
determine if the caller 
can have immediate use 
of the resource. Never 
constructs control 
blocks. 

Places QCB and/or GEL on 
queues only if caller 
can have immediate 
access to the resource. 


Lelay can ke tolerated. 
Places QCB and/or CEL on 
queues. 

Same as HAVE but 
Froduces no return code. 


omitted 


| Converts a shared CEI to 
| exclusive if (a) the QEL 
| is shared (b) the CEL 

| has control of the 

| resource & (c) no other 
| QEL is sharing. 

L 


Processing if a 
resource is not 


Figure 3-5. 


QCB and/or 
QEL Cen- 
structed and 
cueued 


bh — 4 4 YH YH Ih 


requested 
in use. 


Control 
is Re- 


turned to 


Caller 
With Code 


Meaning 
of 
Return 
Code 


Resource i 
availakle 


in 


Resource is 
available 


Resource is| 
available | 


No QEL | 

existed to | 

be con- | 

verted | 
| 

| 


| Type of Previous 

| QEL and Present 

| Request 
}-----------------—- 
| 1. The previous 

| QEL on the 

| queue is 

| "exclusive,” 

| or the present 
| request is 

| "exclusive" 

| 
| 
{ 
| 
| 
| 
{ 


The previous 
QELs and the 
present re- 
quest are both 
“shared,” or 


I 

[ 

l 

{ 

| 

[ 

| There is no 
| previous QEL 
| for the re- 
| source (that 
| is, the QEL 
| queue is empty) | 
| 

| 

| 

} 

| 

| 

| 

| 

[ 

{ 


a ces lec ae een lees aol eien aioe, 


The cailer 
does not con- 
trol and re- 
source or is 
actively 
sharing 


| The caller has 
| control of re- 
| source and QEL 
| is shared with 
| no other QEL 

| sharing 

L 


| 
| 
| 
| 
| 
! 
| 
! 
| 
| 
| 
| 
J 
| 
| 
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Figure 3-6. 


HAVE, NONE or 
omitted 


NONE or 
omitted 


+ —— HH 
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Resultant Processing 

Sets return code equal to 4 and, via the | 
Exit routine and the Dispatcher, returns | 
control to the caller. A QEFL is not con-| 
structed to represent the request. | 
Places requester into wait condition by | 
increasing SVRB wait count, constructs a | 
QEL and places it on a QEL queue, indi- | 
cates that a task switch is needed, | 
branches to the Dispatcher to performa | 
task switch. If RET is HAVE, a return | 
code of Q is also produced and passed to | 
requester after rescurce Fecomes | 
available. | 
Sets return code equal to 0 and, via the | 
Exit routine and the Dispatcher, returns 
control to the caller. Ne QEL is 
constructed. 


Constructs a new CEI, places it on a QEL 
queue, and via the Fxit routine and the 
Dispatcher, returns control to the 
caller. 


a cs cs mc ce ce ee le ee ee i ee 


Sets return code equal to 0, constructs a 
new QFL, places it cn a QEI queue, and 
via the Exit routine and the Dispatcher, 
returns control tc the caller. 

Sets return code equal to 4 and, via the 
Exit routine and the Dispatcher, returns 
control to the caller. No QEL is 
constructed. 


Set return code equal to 0, changes 

CFL to Exclusive and, via the Exit rou- 
tine and Dispatcher, returns control to 
the caller. 


Processing if a requested 


resource iS in use. 
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Figure 3-7. 
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The caller's task 
is already en- 
queued but does 
not have control 
of resource. 


Resource is 
permanently 
unavailable. 

The caller's task 
is already en- 
queued and has 
control of 
resource. 


The resource is in 
use, and the 
caller's request 
has not been en- 
queued. (Only 
TEST & USE.) 

The resource is 
available, cr 
the caller's 
request has been 
enqueued. 


Not used 


Resource is 
permanently 
unavailable. 
No CEL exists 
for the 
caller. 


The caller 
dces not 
have sole 
control of 
resource. 


Rescurce is 
new under 
exclusive 
control. 


The caller's task is 
already enqueued but does 
nct have control of 
resource. No QEL created. 


Previous ENQ with ECB 
request still pending. 
Resource is permanently 
unavailable. No QEL 
created. 

Caller‘s task is already 
enqueued and has control 
of resource. No QEL 
created. 


ee es ee ee ale ee ee ee a 


Resource is in use and 
caller's request has keen 
placed on queue. 


Resource is available and 
caller‘s request has keen 
engueuved. 


Return codes for the ENQ routine. 


{ 


96 








Diagram 3.10 
DEQ Routine 


From SVC SLIH to process 
a DEQ request 


Processing 


IG C048 


Input 














1 Ensure that referenced addresses are 
valid and in real storage, 


Register ] 


Address of parameter list 


ABEND 


IGCO001C 







Output 


8.14 


Parameter List 












Free QELs that represent a request for 


a resource whose use is now complete, BRRRRRRRRRRRRRE REE EEEEEERE EQ Q Updated resource queves 


Address of major name 
Address of minor name 


Free QCBs if there are no more requests. LAR RRRBRRRRRRRREERRRRRE EERE 





Reduce the wait count for the next ENQ 
requester; test whether this requester is 
ready, 





Test for a task switch to the readied 
requester, 


Caller or readied 


Return to the caller or readied requester. 
routine via SVC 3 


:€ UOTIDaS 


S 7{SeL 


uUOTSTAIOIN 


L6 


Diagram 3.10 DEQ Routine (Fodule IEAVENQ1) 

ee a eee ee ee Ne ge cara 
l | ROUTINE 
| NOTES | NAME 
When the program finishes using the resource(s), it | DEQ 
issues a DEQ macro instruction which causes the DEC routine| 
to remove one or more elements from the request queue and | 
to reduce the wait count for the waiting prcogram. If the | 
wait count is now 0, the CEQ routine, via the Exit routine | 
and the dispatcher, may return control to the frevicusly | 
waiting (now ready) program. The program then gains access | 
to its resource(s). | 

| 
To update the resource queues, CEQ searches for the QEL | 
that represents a request that should now be dequeued. | 
It first finds both a major CCE and a minor QCE contain-| 
ing the specified resource names. DEQ then examines the | 
QEL queue associated with the specified resource. If | 
the caller‘s TCB address matches that stored in one of 

the QELs logically at the tog cf its queue, DEQ dequeues 
the QEL and, via supervisor linkage to FREEMAIN, frees 

the space that the QFL occupies. 


PARMLOOP 


Nh 


PROCMIN 


ew 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

( DEQ examines the QCB queues to determine if any CCB way 
| be released. If there are nec more QELS queued tc the 

| incr QCB for the resource, there are no further 

| requests for the resource, and the minor QCB can Le 

| released. In this case, DEQ remcves the mincr QCB from 
| its queue and frees the space it occupies. It then 

| examines the minor QCB queue to decide whether the minor 
| QCB iS needed and can LFe similarly eliminated. If there 
| are no minor QCBs queued to the major QCB, there are no 
| outstanding requests for the entire set of resources. 

| In this case, DEQ removes the major QCE from its queue 
| and frees its space. DEQ then processes in a similar 

| manner any other input parameters that represent QFLS to 
| be dequeued. 

| 

| LOOP1 
| REDUCE 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 
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For each SVRB whose awaited resources are availahle, as 


aS 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
indicated by a zero RB wait count, the DEQ routine tests| 
whether the associated requester can be dispatched. If | 
the requester's task is of higher dispatching priority | 
than the caller's, the requester may be dispatched in | 
place of the caller. | 

| 
For each SVRB that has a zero wait count, DEC calls the | TASKWTH 
supervisor's Task Switch routine to compare dispatching | 
priorities. If the readied requester's TCB has a higher| 
priority than the caller's, the Task Switch routine | 
indicates this fact to the dispatcher Ly placing the | 
requester'’s TCB address in the "new" TCB pointer, | 
IEATCBP. | 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 
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DEQ returns control to the caller or a readied request- 
er, Via the Exit routine and the dispatcher. The Exit 
routine dequeues the SVRE from its RB queue and frees 
the space that the SVRB occupies. The dispatcher 
decides whether to return control to the caller cr tca 
readied requester, depending on the contents of the 
"new" TCB pointer, IEATCEP. If the "new" TCP fointer 
contains the address of the current TCB, the dispatcher 
returns control to the caller. Otherwise, the disfatch- 
er returns control tc the requester whose TCB address is 
in the pointer. In this case a task switch has 
occurred. 
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Chart 3-1 (page 2 of 25). ENQ/DEQ/RESERVE 
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Chart 3-1 (page 5 of 25). 
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special I/0 handling (fcr example, tape label checking or 
I/O error checking). 


The scheduling of user exit routines, called asynchroncus 
exit routines, is handled ky three supervisor routines: 
the Stage 1 Exit Effector, the Stage 2 Exit Effector, and 


schedule the execution of user program-—check routines. 
ABEND processing that results from a program interruption 
can be intercepted by a SPIE macro instruction cr, in the 
absence of SPIE, by a STAE macro instruction. See Liagram 
3.5 for a description of the SPIE routine. 


Through the exit effectors, a supervisor routine can also 
request that a superviscr service he deferred until the 
supervisor routine can cperate under the TCB of the task it 
is servicing. This prevents page faults at times when sys- 
tem integrity or performance might Le impaired. 


The Stage 1 Exit Effectcr is called by supervisor or data 
Management routines. Its purpose is to create and initia- 
lize, according to input parameters, either an IRB (inter- 
ruption request block) to control a user exit rcutine whose 
future use is requested Fy the caller, or a TIRB (task 
interruption request block) that permits the supervisor to 
defer execution until it can execute under the TCB of the 
task being serviced. 


Data management routines enter the Stage 1 Exit Effectcr at 
IGcO43 to begin scheduling routines that handle asynch- 
ronous events. 


The ATTACH routine enters at IGCO43BR to create an IRE and 
a TIRB for a new subtask. 


The caller uses the work area to build IQEs (interruf- 
tion queue elements). For example, the ATTACH rcutine 
builds an IQE for each aSynchronous exit routine. 


N 


The information placed in the IRB during initialization 
includes the save area address, the entry-point address 
of the user exit routine, the size of the RB, and the 
PSW to be loaded to start executicn of the asynchronous 
exit routine. 


OO 


the Stage 3 Exit Effectcr. Note that these routines do not 


LABEL 


+ 
|Stage 1 | IGCO43 
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Exit 
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Diagram 3.12 
Stage 2 Exit Effector 


From supervisor and data management 
routines to perform the second step in 
scheduling an asynchronous exit routine 


Input Processing 










IEAOEFOO 


Register 1 


Address of IQE, RQE, or 
SQE 












1 Calling routine has built an IQE, RQE, 
or SQE, Queue it on the appropriate 
exit queue. 


Register 1 


Address of IQE, RQE, or 


IQE: Complemented address SQE in true form 


RQE: True address, high- 
order byte=X'00' 

SQE: True address, high- 
order byte=X'40' 


IQE on AEQJ 
RQE on AEQA 


SQE on AEQS 











IEAODSO1 


2 Set the Stage 3 switch for the dispatcher. 





Branch to 
caller 
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Diagram 3.12 Stage 2 Fxit Effector (Module IEAVNUOO) 
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| | ROUTINE | 

| NOTES | NAME | LABEL 
}--------------------_-------__-_-----------------~-----------4-----~--4------_~ 
| 1 The exit queue on which the Stage 2 Exit Effectcr flaces|Stage 2 | IEAEFOO 
| the input queue element depends on whether the queue | Exit | 

| element is an IQE (interruption queue element), an RQE |Effector| 

| (request queue elewent), or an SCE (supervisor queue | | 

| element). | | 

| [ | 

| Type of Type of | | 

| Queue Exit | | 

| Element Purpose Queue | | 

| IQE Supervisor routine wants to AEQJ | | 

| schedule an asynchronous | | 

| exit routine. | | 

| | | 

| ROE Data management routine AEQA | | 

| wants to schedule an | | 

| asynchronous routine. | | 

| | | 

| SQE Supervisor wants to schedule AEQS | | 

| an asynchronous supervisor | | 

| service. | | 

| | | 

| 2 This indicates to the dispatcher that an | | 

| asynchronous event is available for scheduling and | | 

| causes the dispatcher to call the Stage 3 Exit | | 

| Effector. | | 
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Diagram 3.13 (Steps 1-4) 
Stage 3 Exit Effector 


Branch entry from the dispatcher when 
the Stage 3 switch is set, to complete 
scheduling an asynchronous exit routine 


Processing 


JEAOEF03 
1 Schedule any available SQEs: 


Input 







Any queve elements on 
their exit queves: 


SQE on AEQS 











@ Queue SQE to TIRB. 
e Activate the TIRB and queve to 


the TCB. 
e Check for a task switch. Rueaueeyp(A) 


2 Schedule any available IQEs: 


IQE on AEQJ 
RQE on AEQA 


Task Switch 


IEAODSO2 


3.16 
















TIRB, IRB, 
SIRB 
@ Queue IQE to IRB. dd 
e Activate the IRB and queue @) at 
it to the TCB. RBIGE SQE, IQE, or RQE 


e Check for a task switch. WAAR DEEEEEEEEGEEEEEEEEEEEEE 


Task Switch 


IEAQDSO2 


Say" 
| RBFACTV | 


3 Queue available RQEs to IRB. 






IEAODSO1 


@ Queue RQEs for the system error task 
to an SIRB. MAARRERREEREEEEEREEEEEEE EERE 


Dispatcher (3.17) 
Step ] 
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Diagram 3.13 (Steps 1-4) Stage 3 Exit Effector (Module IEAVNUO0O) 
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; |ROUTINE | | 

NCTES | NAME | LABEL | 

The dispatcher enters the Stage 3 Exit Effector when it |Stage 3 | IEAQEFO3| 
finds that Stage 2 has placed at least one element on [H#xit | 


an asynchronous exit queue and turned on IEAODSO1 tc signal|Effector| 
that an asynchronous exit routine or asynchronous event is | 
ready for scheduling. 


1 SQES represent a request for a supervisor service cn an 
asynchronous basis. An SQE cannot be processed if: 


e The TCB that the SQE points to represents a task 
responsible for setting the supervisor lock (set 
if a disabled page fault occurs). 
e The SCF is in purge status (Bit 0 of SQEFLAGS=1) 
ABTERM uses the SQE/TIRE processing to schedule ABEND. 
If the TCB is being abnormally terminated, only the 
Special ABTERM SQE will Le scheduled. 


IRBINTL 


Nh 


An IGE cannct be processed if: 


e Asynchronous events are not allowed for the task 
requesting the exit routine. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
® A TIRB is at the top of the TCB's RB chain. A task | 
can become interlocked if it depends on asynchronous | 
processing represented by a TIRB occuring Lefore | 
processing represented Ly an IRB. | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

7 


e The TCB that the IQE represents is the task responsi- 
ble for setting the supervisor lock. 


If an IQE exists, the Stage 3 Exit Effector determines 
whether its IRB is a normal IRB or an attention IRB for 
a TSO task. 


If the IRB is not an attention IRB (RBATNXIT=1), execu- 
tion continues with the chaining process. If it is an 
attention IRB, the TCB associated with this IRE and all 
lower-level tasks in this user's task structure are 
checked to determine whether attention exits and asynch- 
ronous exits are permitted. If not, processing con- 
tinues with the next ICE. If these exits are permitted, 
the IQE is scheduled by queueing the IQE in the usual 
manner. 


fe a a a a ee ee 


| 
| 
{ 
| 
i 
{ 
| 
{ 
u 


One or more of the RCES may represent a request Ly an 
I/O routine for the use of a system error handling 
routine. 


For each RQE representing a request to use an error rou- 
tine, Stage 3 tests first whether a special system requ- 
est Llock is "active," that is, already queued tc its 
system error TCB. The system error TCB is a permanent 
TCB of high priority whose current "dummy" RB is ncrmral- 
ly in a wait conditicn. The request Elock that repre- 
sents a system error handling routine is called the sys- 
tem interruption request Elock, or SIRB. 


If the SIRE is already queued to the system error TCB, 
the "active" bit (RBFACTV) is set in the SIRE‘s status 
field. In this case, the error routine has already Leen 
scheduled for another request. The new request must 
then be deferred and await the next execution of Stage 
3, when the dispatcher is next entered. 


If the SIRB is not “active,” that is, not queued tc the 
system error TCB, Stage 3 removes the RQE from its asyn- 
chronous exit queue and queues it to the SIRE. Stage 3 
then initializes the SIRE. As part of this initializa- 
tion, it sets the RB old PSW to frovide reentry to the 
"error fetch sequence™ (ERFETCH) of Stage 3. 


Besides altering the RE cold PSW, Stage 3 queues the SIRB 
to the system error TCR. 


After Stage 3 queues the SIRE to the system errcr TCE, 
it defers subsequent error requests on the RCE queue. 
These requests are not processed until the SIRE keccres 
"inactive," remeoved frcm its TCB during é€xecution of the 
routine. 
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|Stage 3 
[Exit 
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EFffector 


O€T 





From the dispatcher to find an 
error recovery routine and pass 
control to it 


Processing 


ERFETCH 


5 Call contents supervision to search 
for the requested error recovery 
routine, 


6 Ensure that it is in real storage. 


From the error recovery 
routine to schedule its 
next phase. 


Input 


JECXTLER 


Register 13 


Binary code identifying 


the next phase of the 7 Set up for reentry to ERFETCH. 
error recovery routine 


CDSEARCH Routine 
IEAQCDSR 


4.2 


IEAVVMSR Routine 


4 


ABTERM 
IEAOABOO 


8.12 


MODESET Routine 


1GC107 
aad 


3.21 


Error recovery 
routine 


Dispatcher (3.17) 
Step | 





Diagram 3.13 (Steps 5-7) 
Stage 3 Exit Effector 


Output 


Register 1] 


X'806': Routine could 
not be found. 


Register 15 


Entry point of error 
recovery routine 
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Diagram 3.13 (Steps 5-7) Stage 3 Exit Effector (Mcdule IEAVNUO0O) 
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| | ROUTINE 
| NOTES | NAME 
Seno ee ee Se ee a a a 
| 7 Successive phases of error routines are scheduled Ly |Stage 3 
| the Stage 3 Exit Effector; a system error routine | Exit 

| branches to IECXTLER, which causes ERFETCH to be | Effector 
| reentered to search for the next phase. | 
ie ee oie ape nce 


-}————_+—— 4 


LECXTLER | 


| 
| 
| 
! 
| 
! 
| 
| 
a 


cET 


Diagram 3.14 


Exit Routine 
From user or system programs (except 


type-1 SVCs) to handle exiting from 
these programs 


Input Processing 
1GCO03 


Current TCB 


If a caller is a user program check routine, 
see the notes for this step . 


Next Higher 
Level RB 


Free STA control blocks. 


Exiting RB 


Perform special processing based on the _—_ Last program for the 
type of RB that represents the completed task js exiting End ~of-Task (EOT) 
program. Routine 


co 
aw 





Adjust the dispatchability of the task as 
required, 


Output 





If the next higher level RB is waiting, 
or the task is not dispatchable, force 


a task switch, fe Se ee IEATCBP=0 


a 


Free the RB of the completed program. Dispatcher (3.17) 
Step | 
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Diagram 3.14 Exit Routine (Module IFAVETOO) 
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[ROUTINE | 


| 

| NOTES | NAME | LABEL 

| -----------—_-----------------------------------------=-------—----- 
The Exit routine, a type-1 SVC routine, handles the exit- |Exit | IGC003 
ing procedures for programs other than type-1 SVC routines. |Routine 
Problem programs or system programs gain supervisor- 
assisted linkage to the Exit routine Ly issuing a RETURN 
macro instruction; type-l SVC routines obtain a similar 
result by using an SVC 3 instruction. 


The Exit routine determines the type of program that is 
exiting. The program can be a user fprogram-check exit rou- 
tine, an asynchronous exit routine, an SVC routine, a user 
program, or a supervisor routine operating under a TIRB 
(task interruption request Ltlock). For each tyre of exit- 
ing program, some special processing is performed. 


If the completed program was the first-executed program of 
its task, and therefore is considered to be at the “highest 
control level" within that task, the Fxit routine reco- 
gnizes an end-of-task condition and branches to the End-of- 
Task routine (EOT) to perform ncrnal terminaticn of the 
caller's task. 


The Exit routine dequeues the RE under which the conpleted 
program waS operating for all types of completed programs 
except user program-check routines, which have no RBs. If 
the RB had keen dynamically acquired, the Exit routine 
frees the space occupied ky the RR. 


The Exit routine branches to the dispatcher. 


1 User program- e Ensure that PIF is in real storage. 
check routine 
(no RB) e Restore interrurted routine's registers 
from lcw storage to the TCB general 
register save area. Registers 14-2 are 
restcred from the PIE to the TCB general 
register save area. 


e Clear first-time lcgic switch in the 
PIE to mark the PIE inactive for the 
program interrupticn FLIH. An active 
PIE leads FLIH to interpret the 
program-check interruption as cccurring 
in the program check routine, causing 
abnormal termination of the current 
task. 


e Set up the RB old PSW in the interrupted 
program's RB. The Exit routine takes 
the left half from the left half cf the 
SVC cld PSW, and the right half from 
information in the PIE. The PSW infcr- 
Maticn in the PIE is in EC mcde. 


TCG a a a a a a rs a rs a a a a 
ee ee eee 
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| JROUTINE | | 

| NOTES | NAME | LABEL 

fae es ea ee : . : as { 
The RBOPSW is constructed from two [Exit 


p------------- ------ ---- ------ - - 5 


different sources because (1) the user | 
program-check routine has the option | 
of specifying a return point in the | 
interrupted program that is different | 
from the point of interrupticn, and | 
therefore may store this return address | 
in the right half of the program old PSW| 
in the PIE; and (2) the user program- | 
check routine may have accidentally | 
altered the left half of the program old| 
PSW stored in the PIE. | 
| 
The Exit routine branches to the | 
dispatcher, which returns control | 
to the interrupted user program. | 
| 
| 
| 
| 
| 
| 


If the returning program is not a user program-check 
routine, the Exit routine examines the SCB (STA control 
block) queue pointed to by the TCBNSTAE field in the 
TCB. If there are no SCBs or if ABEND is in progress, 
the SCi processing is bypassed and Exit determines the 
RB type. Exit removes from the queue and frees all SCBs| 
for the exiting program except those SCBs for which the | 
exiting program issued a STAE macro instruction with the| 
XCTL option. The search of the queue terminates when an| 
SCB is found for an RB other than the RB for the exiting| 
program. When the RB for the frogram that is exiting is| 
the last PRB, Exit frees all SCBs, including those for 
STAI. 


Exit determines the type of program that is exiting Ly 
examining the RBSTAB field of its associated request 
block. This RB is always first on the RB queue when 
Exit is entered. Depending on the type of RE, the Exit 
routine performs special processing. 


User program e Restore user‘s registers from low 
(PRB) storage to the TCB general register 
save area. 


e If the returning user program is the 
last to be executed for the task, 
branch to the EOT (End-of-Task) rou- 
tine to perform normal task 
termination. 


Exit routine branches to EOT routine. 


© Go tc CDEXIT to determine whether there 
are other requests for use of the com- 
pleted program, and to prepare for re- 
entry to the program if there are such 
requests. After CDEXIT, execution ccn- 
tinues at Step 4. 


e CDEXIT tests whether the exiting program 
has a CLE (contents directory entry); 
the existence of a CDF is indicated in 
the CDE field of the PRB. If there is 
no CDE, the exiting program was entered 
via the SYNCH macro instruction, which 
does nct build a CDE; in this case, the 
CDEXIT routine returns control to Exit. 
If there is a CDE, CDEXIT continues 
processing. 


EDTR 


CDEXIT 


i es ee 


ee 


ee a i i i 


CDEXIT finds the major CDE associated 
with the PRB of the complete routine, 
and then reduces the use/responsibility 
count in the nwajor CDE. CDEXIT updates 
the RB address in the CDE so it points 
to the next FRE that will control the 
program. This next PRB is associated 
with a task different from that cf the 
caller. 


| 

{ 

| 

| 

| 

| 

| 

| 

| 

CDEXIT makes the new PRB ready by plac- | 
ing 0 in its wait count field; the dis- | 
patcher will test this field before dis-| 
patching the program. CDEXIT also sets | 
the right half of the old PSW field in | 
the new PRB, in preparation for later | 
entry to the contents supervision at | 
IEAQCSO3 in CDEPILOG (Diagran 4.2). | 
| 

The CDEPILOG subroutine is executed when| 
the dispatcher recognizes the new FRB‘s | 
task as the highest priority ready task. | 
(CDEPILOG performs final preparation for| 
linkage to the requested prograr.) | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


After preparing the next PRE to control 
the program, CDEXIT branches to the Task 
Switch routine. This routine tests 
whether the TCB for the previously wait- 
ing PRB way replace the current TCB. 

The Task Switch routine returns control 
to CDEXIT. 


If there are nc cther requests fcr the 
exiting program, CDEXIT uses its subrou-| 
tine, the CDHKEEP routine. CDHEKEEP sets| 
the *"nonfuncticnal® flag in the CDE to | 
indicate that the program has Leen 
executed. Although this flag is meanin- 
gful only for nonreusable pregrams, it 

is always set at this point. 


CDBKEFEP tests the use/responsibility 
count in the CDE tc determine whether 
there are other requests for the exiting 
program. If the use/responsibility 
count is not 0, there is at least one 
outstanding request for the frogram, and 
CDHKEEP returns control to Exit (or to 
CDHKEEP‘s caller). 


count is 0, there is no outstanding 
request for the program. In this case, 
the routine tests the program's 
attributes. 


If the program's storage can be freed, 
either the CLCPURGE subroutine in 

GETMAIN, or ancther sukroutine of Exit 
routine (CDDESTRY), frees the storage. 


Control returns to the Exit routine 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
If, however, the use/resronsibility | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
(Step 4), or another caller. | 
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LABEL 
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CDHKEEP 


CCCESTRY 
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| [ROUTINE | | 
| NOTES | NAME | LABEL | 
(ee 4 
| Type 2, 3, Exit restores the registers Lelonging | Exit |ECDSVRB_ | 
| or 4 SVC to the caller of the completed SVC | | | 
| routine routine from the SVRB register save | | | 
| (SVRB) area to the TCB general register save | | | 
| area. Execution continues at Step 4. | | | 
| | | | 
| IRB, SIRB, Processing of a completed prograr | | SKIPATTN | 
| or TIRB controlled by an SIRB continues at | | | 
Step 4. ! | 
| IRB or TIRB If there are additional requests for | | SKIPATTN | 
| use cf a program represented by an | | | 
| IRB or a TIRE, prepare the program for | | | 
| reuse ky setting up the kB old PSW and _ | | | 
| the TCB general register save area. | | | 
| | | [ 
| Exit branches to the dispatcher. | | | 
l | | | 
| If there are no additional requests for | |WAITEST | 
| use of a completed module, Exit calls | | | 
| the WAIT routine at JSTIME, to test if | | | 
| all the RBs in the region are in a wait | | | 
| state without any time limitations. | | | 
| WAIT applies time limits if there are | | | 
| none. Execution continues at Step 4. | | | 
[ | | | 
| TSO Task Start all subtasks via a branch entry | | IKJATTN | 
| with to I1GC07902 (Diagram 3.18). | | | 
| Attention IRB | | | 
| l | | 
| Free the TAIE. | | | 
[ l | | 
| Execution continues at SKIPATIN, see | | | 
| above. | | | 
| [ | [ 
| If the TCBSTPPR flag is set, indicating that a task is | |EDNEXT | 
| to be set nondispatchable when no longer executing a | | | 
| privileged program (RBATTN=0 for all RBs), a search of | | | 
| the RB queue is necessary. | | | 

l | | 
No task switch is made if NEW does not equal OLD | | | 
| already. | | | 
| | | [ 
! Exit then sets the RE for the exiting program inactive | | EDACT | 
| and removes it from the RB queue and frees, if pessikle, | | | 
| the RB area. If the exiting RB is an IRB with a problen| | | 
| program save area, the save area is also freed. Exit | | | 
| then branches directly to the dispatcher. | | | 
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Chart 3-2 (page 1 of 11). 
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Chart 3-2 (page 2 of 11). Exit routine 
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| |ROUTINE | 
| NOTES | NAME | 
}---------------------------------------------------- -- ---+-- 4 ----~---4-------- 
| The Type-1 Exit routine returns control following execution|Tyre-1 _ | 
| of a type-1 SVC routine. It determines whether control | Exit | 
| should Ee returned directly to the caller of the SVC rou-_ | | 
| tine or to the dispatcher. It passes control to the dis-_ | | 
| patcher if the SVC routine has indicated the need fcr a | | 
| task switch by altering the “*new" TCB pointer, IEATCBP, or | | 
| if a disabled page fault would be incurred by passing ccn- | | 
| trol directly to the caller. | | 
| | | 
| 1 Type-1 Exit is entered from any type-1 SVC routine via a| | 
| Eranch. Its first step is to set the type-i switch to | | 
| zero. ABTFRM uses this switch to determine whether a | | 
| type-1 SVC routine called it. | | 
[ | | 
| 2 Some type-1 SVC routines can place a task in a wait con-| | 
| dition or make a program ready, thus requiring a task | { 
| Switch. The Type-1 Exit routine tests IEATCEP and | | 
| IEATCB+4. If the pointers are equal, no task Switch is | | 
| required. | | 
| | | 
| If the task is being aknormally terminated, control also| | 
| goes to the dispatcher. | [ 
| | | 
| 4 This branch to the dispatcher should not occur often, | | 
| because it means a disakled routine was exposed to page | | 
| faults. The dispatcher handles this special ccnditicn. | | 
| | | 
| If the caller of the SVC routine is a disabled task and | | 
| the NSI is in real storage, or it is a pageakle task but| | 
| is not disabled, the Type-1 Exit routine returns ccntrol| | 
| to it. | | 
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l [ROUTINE | | | [ROUTINE | 

| NOTES | NAME | LABEL | | NOTES | NAME | LABEL | 
p-------------------------------=--------2--------------=---- ee s enmereeree }------------------------------------------------------------}-------- $-------- : 
| The Task Switch routine is used by any disakled supervisor |Task | IEAODS02| | 3 If Task Switch is comparing two tasks that are memkers’ |Task | | 
| routine that wants to determine whether a newly readied [Switch | | | of an APG (automatic priority group; TCBAPG = 1), and if|Switch | | 
| task, which may be of higher priority than the caller of | | | | the newly readied task is I/O oriented (TCBCPU = 0) and | | | 
| the supervisor routine, Should ke dispatched in place of | | | | the comparison task is CPU oriented (TCBCPU = 1), Task | | | 
| the caller's task. | : | Switch may signal a task switch (based on Ster 5). | | | 
| | | | | 
| A Supervisor routine can enter the Task Switch routine | | | 4 Task Switch examines the task queve, beginning with the | |SWNEXT | 
| after it has reduced a program's RB wait count to 0, or | | | { comparison task's TCB. If it finds a task of lower [ | | 
| after it has cleared a nondispatchability flag in a TCB. | | | | priority than the input task before it reaches the input| | | 
| For example, the POST routine may make ready a program that| | | | task's TCB, or reaches the end of the task queue Lefore | | | 
| was awaiting the completion of an I/O operation, or the DEQ| | | | it finds the input task‘'s TCB, Task Switch may signal a | | | 
| rcutine may make ready a program that was awaiting a seri- | | | | task switch (based on Step 5). | | | 
| ally reusable resource. In either case, the supervisor | | | | | | | 
| routine dces not know if the readied routine belongs toa | | | | 5 The following tests determine whether the TCE address of | | SWSETNEW | 
| task of higher priority than that of the caller, and does _ | | | | the input task can Le placed in IEATCBP, and thus | | 

| not know whether it should replace the caller as the cur- | | | | brought to the attention of the dispatcher: | | | 
| rently dispatchable program. The supervisor routines use _ | | | | | | | 
| the Task Switch routine to resolve these questicns. | | | | e Task must be dispatchable (TCBFLGS=0). | | | 
| | | | | | | | 
| 1 First, Task Switch checks IEATCBP, the NEW TCB gcinter. | | | | e Highest RB level of the task cannot be waiting (REWCF | | | 
| Normally IEATCBP contains the address of the TCB belong-| | | | must equal 0). | { | 
| ing to the task that will be next dispatched. IEATCEP | | | | | | | 
| points either to the TCB of the caller's task, to the | | | | e If the supervisor lock is set (CVTSYLK = 1) and the | | | 
| TCB of a previously readied task, or is 0. If IEATCEP | | | | newly readied task is responsible for it, then the | | | 
| is not 0, Task Switch compares the priority in the TCB | | | | task is dispatchakle. If the task is not responsible | | | 
| that IEATCB points to with the priority in the input | | | | for the supervisor lock, and it wishes to disakle cr | | | 
| TCB. | | | | it is already disakled, it is not a dispatchable task. | | | 
| | | | | Otherwise, the task is dispatchable. | | | 
| If the first word of the TCB pointer equals 0, Task | | | b_---_____------ --- - + + + +--+ - + -- 1-------- 1-—-~---- 4 
| Switch compares the dispatching friority of the newly | | | 

| readied routine to the priority in the TCB pointed to by| | | 

| IEATCBP+4, the OLD TCB pointer. | | | 

| | | | 

| 2 The Task Switch routine tests the time-slicing Lit in | | | 

| the TCBs. If either task is a member of a time-slicing | | | 

| group (TCBFTS = 1), Task Switch cannot indicate a task | | | 

| switch. | | | 
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| NOTES [NAME [LABEL | | NOTES | NAME [LABEL | 
}--------~---------------~-------~-~-------------------------- +-------- $-------- | NE ares ace RESP ENE SELENITE IEE PE Ie aa os  eremecag toa 
| Upon entry to the dispatcher, OLD (IEATCBP+4) contains the |Dis-— | IEAOCS | 3 The dispatcher saves registers in the TCB and calls | Dis- | DSWTASK 
| address of the last user routine's TCB to have control |patcher | the Timer Dequeue routine to dequeue all task TQEs on |patcher | 
| before the supervisor. NEW (IEATCBP) contains the address | | the timer queue. | | 
| of the TcB for the program to receive control next, or | | | | 
| equals 0, indicating that the dispatcher is to determine | | 5 The dispatcher calls Timer Enqueve to set up task | | DSSEARCH 
| which task is to receive control next. | timing. | | 
| | 
{ If the two TCB pointers are not equal, and the NEW TCB ! | 6 The task that will gain control has been selected. The | | DSENTER 
| pointer (IEATCBP) does not contain 0, IEATCBP peints to the| [ dispatcher ensures storage protection. The STOR (seg-_ | | 
| NEW TCB whose current routine will be given control. | | ment table origin register) must point to the proper | | 
| | | segment table. For pageable tasks with a nonzere fro- | | 
| 1-5 Several possible comtinations of the NEW-OID pointers | | tection key, segment table entries must be validated. | | 
| exist: l | | 
| | 7 The paging supervisor enters the dispatcher to request | | TEAODSO1 
| e NEW equals OLD: It may be possible to redispatch | | that a task be made temporarily nondispatchakle. This | | 
| OLD. | | is an attempt to lcwer a high paging rate. | | 
| [ | | 
| e NEW equals 0: OLD cannot ke dispatched, the task | Nonpageable and TSO tasks are not eligible for selection| | 
| queue should be searched downward from OLE to finda | | by the dispatcher. However, if no other eligible task | | 
| new ready task. | | can be found, the dispatcher will call TSO to allow TSO | | 
| | | to take action. | | 
| ® NEW does not equal 0 or OLD: It may be possible to | | | | 
| dispatch NEW. | | The dispatcher also sets tasks dispatchable when the | | 
| | | paging supervisor requests it. | | 
| ® OLD has X'80" in the high-order byte: The OLD was | | | | 
| removed from the system before the dispatcher gained | | 8 Nonpageable regions and TSO regions are not considered | | 
| control. The task tc receive control is determined | | for migration. The selected is the job-step task of the| | 
| from the contents cf NEW. | | lowest dispatching priority among the eligible job | | 
[ | | steps. | | 
| 2 If OLD=APG then special APG processing is necessary, | | | | 
| depending on whether OLD gave up control due to an [ | No call is made to the dispatcher when pages are being | | 
| explicit wait or because its timer interval expired. | | transferred from a secondary paging device to a primary | | 
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The STATUS routine permits a problem or system prcegram to |STATUS 
change TCB fields that control the dispatchability of a 

task. 


Routines with a protection key of 0 can use the STATUS rou- 
tine to set or reset the status of particular tasks. The 
affected task status can be either the "*must-conplete”™ sta- 
tus or the "nondispatchakle" status. 


Problem programs are restricted to the SVC interface, and 
can control only the start/stop count in the TCE. 
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START or STOP operand, the routine determines whether | 
the specified subtask of the current task or all sub- | 
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the subktask TCB(s), and the appropriate dispatchability | 
flags may be cleared. When STOP is specified, the stop/ | 
start count is increased in the suktask TCB(s) and the | 
dispatchability flags are set. A task is set nondis- | 
patchable only if no system routines are being executed | 
for it, as indicated by the TCBATT flag. If a systen | 
routine is being executed for the task, the TCBSTPPR | 
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The STATUS routine sets the specified dispatchability 
flag or flags in the specified set of TCBs. (If RESET 
is specified, the specified dispatchakility flag or 
flags are cleared in the specified set of TCEs.) Four 
sets of tasks can ke Specified: the system, the jok 
step, a specified task and its related lower-level 
tasks, or a Single task. If SYSTEM is specified, all 
tasks of the system are set nondispatchakle excert the 
current task and the permanent system tasks. If STEP is 
specified, all tasks in the job step are set nondis- 
patchable except the current task. If a TCB address 
starting with the job-step task is specified, the task 
and its descendants are set nondispatchable. If the 
current task is among the descendants, its status is not 
changed. If E is specified, only the task explicitly 
identified is set nondispatchable. 


The particular dispatchability flag or flags that are 
set (or cleared) in each TCB depend on the mask Eit 
number specified in the STATUS macro instruction. 
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When entered via the macro insStruction STATUS SET, MC, 
STEP SYSTEM, the STATUS routine sets the caller's task 
in “step™ or “system" must-complete status. (If the 
RESET operand is specified, the must-complete status 
that was previously set is cleared.) The routine sets 
the must-complete flag in the current TCB, the frohikit- 
asynchronous-exits flag in the current TCB, and the step 
or system "“must-complete"™ dispatchability flag in other 
TCBs of the job step or systen. 


If STEP was specified, then all tasks in the job ster, 
including the initiator, are affected. If SYSTEM was 
specified, then all tasks below the permanent system 
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If the return from the LRA instruction indicates that 
the input address does not point to a valid SGTE (seg- 
ment table entry), Validity Check sets a nonzero ccndi- 
tion code and returns control to the caller. 


The return from the LRA instruction may indicate that 
the input address points to a valid SGTE, but that the 
PTE (page takle entry) does not point to a page in real 
storage. In this case, Validity Check gets the real 
Storage address of the PTE and enters the paging super- 
visor at IEAPTRV. Subroutine IEAPTRV converts the real 
storage address of the PTE to a virtual storage address. 


Validity Check new tests the PGTPAM bit in the PTE. If 
the bit equals i, the page containing the ingut address 
has been assigned Ly GETMAIN and is valid. If the page 
is invalid, Validity Check returns a nonzero conditicn 
code. 


After Validity Check determines whether the input 
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XPTPROT field of the XPTE (external page takle entry). 
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determine whether an address is in real storage or 
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condition code in the PSW. 
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By entering the MODESET routine through a macro call, an | 
authorized problem program or systen program can change its| 
system mask, change its mode, and change its protection | 
key. In this case, MCDESET alters the SVCOPSW, which ccn- 
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In the MODESET macro, Eoth the ENABLE and SYSMASK 
operands request chances to the system mask. These two 
parameters should ke coded in a single call to MODESET. 
MODESET sets the masks requested by the ENABLE oferand 
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After a branch entry, MODESET places the parameters 
necessary to restore the caller's system mask in regis- 
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(ASIR) to ready the system error task 


RQE 


* 


7 


v. i 
fe do ge % 


we Sy 
rey 


108 
: : p alll 
IOBFLAG 1 
IOBFLAG2 
From ASIR 
routines to 
complete 


5 Set registers for reentry to PHOENIX, 


PHOENIX (retry routine) 


6 Place the system error task in a wait 


Diagram 3.22 
System Task ABEND Recovery (STAR) 
Exit Routine of the System Error Task 


Processing Output 


SUPRSTAR (exit routine) 


1GC107 
Find the RQE, if any, associated with Disable system. IOB 


Zz | MO DESET Routine 





the task that caused the I/O error. If 3.2] 
not found mp5 


Set the permanent error flag in the a den 
IOB pointed to by the RQE, MBAR RREEEEEEEEEEEEEESEE 






IO BFLAG2 


IOBFLAGI 


Register | 
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Abnormally terminate the task that 
caused the I/O error. 


ABTERM 
IEAOABOO 
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Free the RQE, ERREXCP Routine 
iGCO15 
Post 1/O; free RQE. 


Register 0 


Address of PHOENIX 


Register 15 


Return code X'04' 





ASIR Phase 3 (8.46) 
(ASIR purges all but 
top RB.) 


MODESET Routine 
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Diagram 3.22 System Task ABEND Recovery (STAR) Exit Routine of the System Error 
Task (Module IEAVNUQO0) 
a ar pr ne Ee ee a ee ee aS 2 Seri re read 
| | ROUTINE 
| NOTES | NAME 
|--—------------—_------~---~---------+---------~----~ +--+ ---4-------- 
| When the system errcer task fails, the System Task ABEND | STAR 
| Recovery (STAR) routine gains control. The STAR routine is| 
| in the system error task, and has two parts -- an exit rou-| 
| tine and a retry routine. | 
| | 
| Both the exit and retry routines are disabled during nest | 
| of their execution. The exit routine schedules abnormal | 
| termination of the task that the system error task was try-| 
| ing to correct. The retry routine places the system error | 
{| task in a wait state, ready to service ancther I/O error. | 
| | 
1 1 ‘The STAR routine searches the RB queue of the syster | 
| error task for the SIRE, trying to find the RCE (request| 
| queue element) that belongs to the task that caused the | 
| I/O error. RQEs are built by data management routines | 
| and are used by the I/O supervisor to schedule I/0 | 
| requests. | 
| | 
| If STAR finds an RQE, it inspects the RQETCB field to | 
| determine whether this is a normal RQE (RQETCE # 0), or | 
| a dummy ROE (ROFTCR = 0). If the RQE is a dummy, STAR | 
| records a paging device error, and there is no task to | 
| abnormally terminate. In this case, STAR continues at _ | 
| Step 5. | 
| | 
| If the ROE points to an IOB (input/output bleck), STAR | 
| turns off the error-in-process flag (IOBFLAG1), and sets| 
| the permanent-error flag (IOBFLAG2). | 
| 
6 | STAR 
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The routines of contents supervision 
search virtual and auxiliary storage for 
requested modules and schedule their use. 
The LINK, SYNCH, LOAD, XCTL, DELETE, and 
IDENTIFY SVC routines comprise contents 
supervision. The overlay supervisor and 
Program Fetch are also part of contents 
supervision. 


Diagram 4.0 (a visual table of contents 
to the diagrams in this section) and Dia- 
gram 4.1 (a diagram showing the overall 
logic of contents supervision) point to the 
diagrams for each of the above routines. 

To help you understand the operations 
described by the diagrams, the following 
subsections describe: 


e Calling the LINK, LOAD, and XCTL rou- 
tines by issuing a macro instruction 
(see OS/VS Supervisor Services and 
Macro Instructions for detailed 
information). 


e Searching virtual and auxiliary storage 
to find requested modules. 


CALLING THE LINK, LOAD, AND XCTL ROUTINES 


Problem programs and system programs 
call contents supervision to find a 
requested module by issuing a LINK, LOAD, 
or XCTL macro instruction. Certain impor- 
tant operands in the macro call determine 
which storage is searched and the order of 
the search. The operands are shown in 
Figure 4-1. Only one of the first three 
Operands can be coded, and the DCB operand 
is optional. 


SEARCHING VIRTUAL AND AUXILIARY STORAGE 


The contents supervision routines find a 
module by scanning control blocks that 
represent modules. These control blocks 
form different queues and directories, and 
each queue or directory descrikes a dif- 
ferent part of storage. The queues and 
directories are: 


e JPA (job pack area) 
e LPA (link pack area) 
e TSLPA (time sharing link pack area) 


e Auxiliary storage libraries 


HOW MODULES (CONTENTS) ARE SUPERVISED 


i ea ge at eek 1 
Meaning 


is the entry-point name in 
the module to be given 
control. 


EPLOC is the address of the entry- 
point name in the module to 


be given control. 


o 
ita] 


is the name field of a list 
entry for the entry-point 
name. The list entry is con- 
structed using the BLDL macro 
instruction. The DCB operand 
must indicate the same DCB 
(data control block) used in 
the BLDL macro instruction. 


: 


is the address of the DCB for 
the partitioned data set con- 
taining the entry-point name 
for the module to ke given 
control. The address of the 
data control block for the 
link and job libraries is 
designated by specifying an 
address of 0, or by omitting 
the DCB operand. 


Rape mm es mr ee cs ss es ee ee ss es ee ee es es di 


Figure 4-1. Important operands in the 
LINK, LOAD, and XCTL macro 


instructions. 


The Jok Pack Area 


The JPA (job pack area) in virtual 
storage contains modules needed for the 
execution of jobs. The JPA is in subpools 
251 and 252 of a region. Problem programs, 
including TSO tasks, execute in the JPA. 
Modules in the JPA may be executed only by 
the user in whose region they are stored. 


Modules in the JPA are represented by 
CDEs (contents directory entries). Each 
CDE contains: 


e The name of the module it represents. 
e A pointer to the module’s entry point. 


e A use count (in fields CDROLL and 
CDUSE) which represents the total numb- 
er of successful requests for a module 
by ATTACH, LINK, LOAD, and XCTL macro 
instructions. (The maximum use count 
is 4095.) 
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If a caller has specified an alias entry 
point within a called module, there are two 
CDEs for the module. The major CDE con- 
tains the entry-point name, and a minor CDE 
contains the alias entry-point name. 


The Job Pack Area Queue: The CDES repre- 


senting a user's modules in the JPA are 
chained together and are called the JPAQ 
(job pack area queue). The JPAQ is in the 
LSQA assigned to a region. Each job step 
in the system has its own JPAQ, and the 
first CDE on the JPAQ represents the first 
module requested by the jok step. The 
beginning of the JPAQ is pointed to by the 
TCBJPQ field in the jok-step TCB. 


The Load List: Each time a module is allo- 
cated to a requester by the LOAD routine, 
the use count in the CDE is increased, as 
noted previously. Also, an LLE (load list 
element) is created if one does not exist, 
and its responsibility count (LLECOUNT) is 
increased. The LLEs for each task in the 
job step are chained together to form the 
load list, which is the first queue 
searched by the LOAD routine. Figure 4-2 
shows the control blocks for modules in the 
JPA, including LLEs. 


The need for a responsibility count in 
the LLE separate from the use count in the 
CDE is not readily apparent. Each time a 
module is successfully allocated by the 
LOAD routine, the requesting routine may 
issue a DELETE macro when it no longer 
needs the module. The DELETE routine 
decreases the use and responsibility 
counts, and frees the module and its 
storage areas if they are both 0, meaning 
that there are no more outstanding 
requests. 


LPA Storage Areas 


The LPA (link pack area) contains: (1) 
modules that may be executed concurrently 
by all tasks in the system, and (2) a dire- 
ctory of those modules. There are three 
LPA storage areas: 


e The LPA directory 
e The link pack area 


e The Fixed LPA 


The LPA Directory: The LPA directory is 
created in pageable storage during nucleus 
initialization. It contains an LPDE (link 
pack directory entry) for each entry point 
in the LPA modules. LPDEs for major entry 
points contain a CDE and a compressed 
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: CDE for module loaded for caller's task 


Control blocks for modules in 
the JPA. 


Figure 4-2. 


extent list, while LPDEs for alias entry 
points contain the name of a related major 
IPDE rather than a compressed extent list. 
LPDEs are organized during nucleus initia- 
lization, and are not chained as are the 
CDEs on the LPAQ and the JPAQ. Diagram 4.4 
describes the search for an LPDE that 
represents a module that cannot be found on 
the LPAQ. 


The link pack area 
contains the LPA modules. All type-3 and 
type-4 SVC routines and all ERPs (error 
recovery procedures) are placed in this 
area, which is pageable. 


All LPA modules in use are represented 
by CDES on the LPAQ (link pack area queue). 
When an LPA module is no longer needed (the 
use count in the CDE reached zero), the 
control blocks that represent it in the LPA 
are removed by the Exit routine. These 
modules are still represented by LPDES on 
the LPA directory. 


The Fixed LPA: During nucleus initializa- 
tion, the user may specify that any module 
in the LPA is placed in a permanently fixed 
area of real storage. This area is called 
the fixed LPA and is not paged. These 
modules are also represented by CDEs on the 
LPAQ, and they are used in preference to an 
identical paged copy of the module in the 
LPA. 





Time Sharing Link Pack Area 


The TSLPA (time sharing link pack area) 
is in the TSC (time Sharing control) 
region, and contains TSO modules that may 
ke executed concurrently by all TSO tasks 
in the system. These modules are repre- 
sented by CDES on the TSLPAQ (time sharing 
link pack area queue). 


Auxiliary Storage Libraries 


When the contents supervision routines 
cannct find a requested module in virtual 
storage, BLDL searches the libraries on 
auxiliary storage. Modules on auxiliary 
storage are represented by PDS DEs (parti- 
tioned data set directory entries). 
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Contents Supervision 
Visual Table of Contents 
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SVC First-Level and Second-Level 
Interruption Handlers 


Problem or system program requests 


a contents supervision service 





SYNCH Routine 


The SYNCH routine permits supervisor routines to take 
synchronous exits to processing programs. SYNCH calls the 
CDEPILOG subroutine to schedule the processing program. 




















4.6 


LOAD Routine 


The LOAD routine finds a requested module and builds an 

LLE, CDE, and an extent list for the module if necessary. 
After a LOAD request, control returns directly to the caller; 
the requested module does not gain control. 4.7 


XCTL Routine 


The XCTL routine finds a requested module and passes 
control to it. The caller does not regain control. 


2 Zo 2s 












Overlay Supervisor 


The overlay supervisor determines whether a requested module 
is in virtual storage, and causes the loading of a requested 
overlay segment that is not in virtual storage. The overlay 
supervisor passes control to the caller or to an address in the 
requested overlay segment. 4.11 





DELETE Routine 


When a module brought into virtual storage via the LOAD 
routine is no longer needed, the DELETE routine frees the 


module's storage. 4.9 





IDENTIFY Routine 


The IDENTIFY routine informs the supervisor of a module's 
embedded entry-point name that was not established by the 
linkage editor, Also, for modules brought into storage by 
the loader, IDENTIFY creates a major CDE. 






4.10 











e Diagram 4.1 
Overview of Contents Supervision 


Except for Program Fetch and the SYNCH routine, each of 
these routines provide services that can be requested by 
problem or system programs via macro call, Program Fetch 
has branch entry points, and the SYNCH routine is available 
to supervisor programs by supervisor call (SVC). 


Contents supervision consists of many subroutines because it 
must search various parts of storage. SYNCH, LOAD, and 
XCTL enter these subroutines by branching to LINK, which 
in turn calls the subroutines, or by branching directly to the 
subroutines. Diagrams 4.2 through 4.5 describe these 
important subroutines. 


LINK Routine 


The LINK routine finds a requested module by calling 
searching subroutines. When the module is available, LINK 
passes control to it. After the module executes, the caller 
regains control at the instruction following the LINK macro 
instruction. 4.2 













Program Fetch 


Program Fetch loads a specified module or overlay segment 


into virtual storage, 


4.12 
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Diagram 4.2 (Steps 1-4) 
LINK Routine 
From SVC SLIH after a LINK macro 


instruction has been issued to pass 
control to a requested module 


Input Processing Output 


IG C006 
Register 15 
Address of parameter list 39 [Q--- 1 Ensure that the parameter list is 
From ATTACH (3.2) in real storage. 


and XCTL (4.8) to 
pass control to a 
requested module 


Register 9 


CDADVANS, IEAQCSO1 

Address of entry-point name 

2 Set register 8 to caller's JPAQ 
address and set contents supervision GINREGS 

Address of DCB SVRB to look like a PRB. 


Register 10 
Register 8 


Address of JPAQ 


From the dispatcher 
(3.17), CDSETUP 
(4.3), and LOAD 
(4.7) to pass control 
to or load a requested 
module 


Same as for CDADVANS, except 
Register 8 


Address of contents directory 
to be searched 


RBSTAB 


CDCONTRL, IEAQCS02 





Se a ee eee ee 3 Search for the requested module in 
the contents directory indicated in CDSEARCH 
register 8, Register 11 


ee Address of CDE 


4 If the module could not be found, 
pass control to CDSETUP to direct 
the search. 


Register 8 
Routing to Searching 
Routines (4.3) 
Step ] 


Address of contents directory 
last searched 


Register 9 


(Continued at Step 5) Address of entry-point 
name 


Register 10 
Address of DCB 
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e Diagram 4.2 (Steps 1-4) LINK Routine (Module IEAVLK00) 


a 
| NOTES 

bese eee See ee ee oe ee ee eee eee eee 
| The LINK routine is the central routine of contents super- 
| vision. It directs the XCTL, LOAD, and ATTACH routines to 
| the subroutines of contents supervision to find and oktain 
| linkage to a requested module, or to load a requested 

| module. 

| 

{ 1 LINK calls LXPREFIX to ensure that the parameter list 

| is in real storage. 

| 

| 2 The two high-order bits of the RBSTAB field in the 

| SVRB (supervisor request block) are set to 1 to make 

| the SVRB look like a PRB (program request blcck). Now 

[ ABEND can free the module if the requester aknormrally 

| terminates. 

| 

| The address of the requester's JFAQ (jcb pack area 

| queue) is placed in register 8 to indicate to CDSEARCH 

| which queue is to be searched. 
a a ee eee 


= 
| ROUTINE 
|NAME 


CLT 


Input 


(from ALIAS1) 


Registers 0 and 1 
Name of requested module 


Address of contents directory 
last searched 


Register 9 


Register 11 
Address of requested CDE 












From 4.4, Step 3 
and 4.5, Step 3 to 
allocate the 
requested module 


From ALIAS1 (4.5) to determine 
whether a module is available 


Processing 


PLUSCONT 


5 Determine whether the module can 
be used immediately. 


e Cannot be used. Go to Diagram 
4.3, Step 1. 


e@ Can be used later (being fetched 
or is a reusable module that fs in 


use and this is not a LOAD). 


@ Can be used now. Continue. 
CDEMERGE 


G Increase the use count in the CDE. 


7 Ifa job-step is being attached, set 
the JSCB authorized if the CDE is 
authorized. 





Otherwise, exit. 


LOAD request 


All other requests 


CDALLOC 


ERRORTAB 


CDQUECTL 
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CDLDRET 


See Diagram 4.7 for 
output from a LOAD 
request. 


CDEPILOG Routine 


IEAQCS03 
Build a PRB for the 
requested module 


and chain it behind 
the contents 
supervision SVRB. 
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Dispatcher (3.17) 
Step 1 





Exit Routine 


1GC003 
Remove contents 
supervision SVRB, 


3.14 


Dispatcher (3.17), 
Step 1. When the 
task is next 
dispatched, the 
dispatcher loads the 
PSW from the new 
PRB. 





Diagram 4.2 (Steps 5-7) 
LINK Routine 


Output 


Register 1 


a Completion code 


X'406' - Not a LOAD request, 
but load-only module 





CDE 





| COROLL 
| cDuse | 
CDAUTH 


JSCB 


JSCBAUTH 












mo 
TCB 
SVRB 
NAN ANALY 
PRB 
Register 15 


Address of requested 
module 


2t UOTIDeS 


Ss squaquo5 


uOoOTSTazodn 


ELT 


e Diagram 4.2 (Steps 5-7) LINK Routine (Module IEAVLK00) 

Dan gee ee ee eT Ng ty ee te ee too ia maa ae 
|ROUTINE | 

| NOTES |NAME | LABEL | 
ae a a ee ee ee eee bee ee 
| 6 If the CDE (contents directory entry) for the requested |CEMOPUP |CDMOPUP 
| module is in the TSLPA (time sharing link pack area), | | 
| or if the requester is a TSO task, CDMOPUP dces not 
| increase the use count. 
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Diagram 4.3 
Routing to Searching Routines 


From the LINK routine (4.2), 
Steps 4 and 5, to continue the 
search for the requested module 


Input 


Register 8 


Address of queue last 
searched 


Address of entry-point 
name or DE save area 


Register 10 
Address of DCB 


Register 11 
Address of requested CDE 


Register 12 


From IEAVVMSR 
Address of major CDE (4.4) to search 
LPAQ 





Processing 


CDSETUP 


1 CDSETUP determines the search 
order for contents supervision and 
calls the correct searching routine. 


2 Search for module requested by EP 
or EPLOC form of macro: 


1 JPAQ (already searched in LINK) 


2 Specified library, or JOBLIB if 
none is specified. 


CDFILIN 


3 LPAQ 

4 TSLPAQ 

5 LPA directory 
6 SVCLIB 


7 LINKLIB 


3 Search for module requested by DE 
form of macro: 


1 JPAQ (already searched in LINK) 
2 LPAQ 


3 TSLPAQ 


4 LPA directory 


5 Library specified, or default 


Output 


Output to LINK (4.2), Step 3, 
is: 
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Address of next contents 
directory to search 
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Diagram 4.3 Routing to Searching Routines (Module IEAVLK01) 
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| | ROUTINE | 

| NOTES {NAME | LABEL 

| -----------------------------~--~---------------------------4-------- $-----~-- 


CDSETUP is a subroutine of contents supervision. It 
determines the search order for a requested module kased on| 
input parameters. The areas searched in Steps 2 and 3 are | 
named in the order that they will be searched based on the 
type of macro issued. 


|CDSETUP |CDSETUP 
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Diagram 4.4 
IEAVVMSR: Searching 
the LPA Directory 


CDSETUP calls IEAVVMSR to 
find the LPDE that represents 
the requested module 


Input Processing Output 
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ee 1. Search the LPA directory. IEAVVMSR 


BR 14: Found 


Register | 


Last four characters 
of entry-point name 


BR14+4: Not Found 





Active LPAQ 


2 \f the LPDE for the module cannot 
be found, go to SATMAR. 


BLDL/Program Fetch 
Interface (4.5) 
Step 1 





3 Build and queue the CDE on the 
LINK Routine 


LPAQ, DETOLPAQ 
Step 6 


ERRORTAB $=" |~ 
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Completion code 
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Diagram 4.4 IEAVVMSR: Searching the LPA Directory (Module IEAVLK00) 


We he eae ee ee ed ee ps ed ane a ey ge de ee as as ag a Pe a ee Na ee —~1 
[ROUTINE | | 
NOTES | NAME [LABEL | 


| 1 IEAVVMSR computes an index factor into the LPA directory |IEAVVMSR| IEAVVMSR | 
| by doing an Exclusive OR on the halves of the names in | | 
| registers 0 and 1, and then dividing the result by the _ | 
| value found in location IEAVVMDI (placed there ry NIF). | 
| The remainder is multiplied by 32 and added to the | 
| address of the LPA directory (in CVTLPDIR). IEAVVMSR now| 
| has the address of an LPDE (link pack directory entry) | 
| in the LPA directory, and determines whether the name in| 
| the LPDE, or the name in another LPDE in the chain | 
| matches the input name. | 
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SLT 


From CDSETUP routine (4.3) to find 
and load requested modules 


Processing 


SATMAR 


Input 






Register 5 


Address of SVRB 


a" 1. If a CDE for the module, and a work 
Register 8 


area for BLDL and Program Fetch do 
Address of contents not exist, get storage for and 
directory initialize them. 


Register 9 


Address of entry-point 
name or DE save area 2 If this is a minor CDE, go to ALIAS 1 


Register 10 
Address of DCB 


3 If DE form of macro, go to DEFOUND 


4 Go to BLDL, no DE coded. 


5 if the PDS DE is found by BLDL, go to 
DEFOUND, opposite Step 3. 


6 If the PDS DE is not found, and all 
libraries have been searched, go to 
ERRORTAB, 





7% ~~ When BLDL has searched the JOBLIB 
unsuccessfully, or a library other than 
JOBLIB or SVCLIB unsuccessfully, go 
to CDSETUP, 


8 Return to Step 4 to search LINK LIB 
after searching SVCLIB, or to 
complete the JOBLIB search. 


ALIAS} 


Build or find major 
CDE; load the module 


DEFOUND 


Examine the PDS DE. 






BLDL Routine 


JECPBLDL 
Search for PDS DE. 


ERRORTAB 


Ep 4 













Ci GETMAIN Routine 


RMBRANCH 
6.1 


LINK Routine (4.2) 
Step 5 


Program Fetch 


Load the requested 
module 4.12 


LINK Routine (4.2) 
Step 6 


ABEND 


IGCO001C 
- 8.14 


Routine to Searching 
Routines (4.3) 
Step 1 


e Diagram 4.5 
BLDL/Program Fetch Interface 


Output 


Program Fetch Work Area 


BLDL Work Area 


Register 1 


Completion code 


X'806' - BLDL unsuccessful 
or I/O error during BLDL 
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Diagram 4.5 BIDL/Program Fetch Interface (Mcdule IEAVLK01) 
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SATMAR creates a CLE (contents directory entry) and | SATMAR 
queues it to the job-step TCE. The CDE is kEuilt pricr | 

to BLDL and Program Fetch processing to ensure that sub-| 
sequent requests for the same module will be deferred 

during BLDL ocr Program Fetch processing. 


wk 


| 

| 

BUILDEL is a contents supervision subroutine that calls |BUILDEL |EUILCEL 

the BLDL routine. BIDI trys to find the PDS DE | 

{partitioned data set directory entry) for the requested | 
| 
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module. 
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ASS 


ost 


Input 


Register 2 


From SVC SLIH after a SYNCH 
SVC has been issued, to pass 


control to a user program 


Address of SCB, or 0 


Register 4 


Address of caller's TCB 


Register 5 


Address of contents 
supervision SVRB 


SCB 







TC 
_ Sai 
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SCBSUPER 
SCBKEYO 





PIE 
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> 
s.* 
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SVRB 





Sarl 


PICA 


Program 
mask 
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| 


Processing 


IGCO12 


Get PRB storage from the LSQA. 


Move the first 40 bytes of the 
contents supervision SVRB to the 
new PRB. 


Chain the PRB to the SVRB. 


Initialize the PRB resume PSW in 
the standard format. 


Set state and protection key in the 
resume PSW. 


If a PICA exists, move the program 
mask from the PICA to the resume 
PSW. 











Diagram 4.6 
SYNCH Routine 





Output 
TCB 
GETMAIN 

| RMBRANCH 

Get storage from 

subpool 255. 

6.) 
SVRB 


PRB 


RBOPSW 


SVRB 


(caller's) 


| Exit Routine | Routine 


1GC003 
Remove contents AANA NAAAAS 


AAABAIABLBRBa Ba’ 


supervision SVRB. 
3.14 





Dispatcher (3.17), Step 1. 
When the task is next 
dispatched, the 
dispatcher loads the PSW 
from the new PRB. 
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Diagram 4.6 SYNCH Routine (Module IEAVLK0O) 
a a a Ea a a am ea sen a cele tani Soa ee 


1 
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After minor housekeeping processing, SYNCH passes 
CDEPILOG THRUX control to CDEFPILOG at THRUX. 


The PRB is chained behind the SVRE because the Exit rou- 
tine later removes the top RB on the RB queve and the 
module represented by the request level RB gains 
control. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Standard format for the PSW is X‘070D000000%. This may | 
be modified in Steps 5 and 6. The RBOPSW is called the | 
resume PSW in the steps above. The dispatcher loads | 
this PSW to give control to the user frogram. | 
| 
| 
| 
| 
| 
| 
i 
| 
| 
| 
| 
| 
4 


If the SYNCH request was not to enter a STAE exit rou- 
tine (TCBSYNCH=0), the requested program will execute 
with the protection key in the caller’s TCB (TCBFKF) and 
in problem state. 


If the SYNCH request was to enter a STAE exit routine, 
the RBOPSW is set to indicatee supervisor state if 
SCBSUPER equals 1, and key 0 if SCBKEYO equals 1. If 
SCESUPER equals 0, the RBOPSW is set tc indicate proklem 
state, and if SCBKEY0O equals 0, the RBOPSW is set equal 
to the protection key in the caller's TICB. 


RCUTINE | 


|NAME | LABEL 
The SYNCH routine makes it rossible for a supervisor 
routine to take a synchronous exit to a user progran. 
SYNCH initializes a PRB and schedules execution of the 
requested program. After the user program has Leen 
executed, the supervisor routine that issued the SYNCH 
Macro instruction regains contrcl. 


IGco012 


—— — — — + 


————— —- —- 1 
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Diagram 4.7 
LOAD Routine 
From SVC SLIH after a LOAD 
macro instruction has been 


issued, to load the requested 
module 


Input Processing 
1GC008 
Register 0 
Address of entry-point 1 Ensure that referenced addresses 
name or PDS DE are in real storage. Output 
2 Set register 8 to caller's JPAQ address 


and set contents supervision SVRB to 


look like a PRB. GINREGS Register 8 


Address of caller's JPAQ 
3 Search the requester's load list. 
Register 4 If module is found, continue at SVRB 
Step 4. CDLLSRCH I 
Address of caller's TCB 7 
RBSTAB 








4 Determine whether the module 
can be used immediately. CDALLOC 


CDE 
rap dn, BS, LINK Routine (4.2) lapeoot in 
Su e Cannot be used 
LLE : Step 3 | CDROLL | 
fie. CDNAME e Can be used later (being fetched). e tee tha 
LLECDPTR CDQUECTL 
e@ Can be used now. Go to Step 5. 


Queue the LOAD Dispatcher (3. 17) 
5 Increment the use count in the CDE, 
Se ee ee ee 


ABEND 


IGCO001C 
8.14 


Load List 








ERRORTAB 


Abnormally terminate 
the requester. 


X'906' - Use count exceeds 4095 
or responsibility count 
exceeds 255, 

X'606' - LPA module too large 

to fix. 








Fix LPA module LLECOUNT j LLECDPTA 


Relocated entry-point address 
Caller via the Register 1 
Exit routine = a Size of module 


(SVC 3) 
Authorization 


CDLDRET 
6 Build and initialize the LLE. a LLE 
az ; PGFIX Routine Pe. LLECHNA 
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e Diagram 4.7 LOAD Routine (Module IEAVLKOO) 


Cre es Se Sa eS a re ee a ee Soe ee 2 pag aeons T=ss5 >= aa | 
| {ROUTINE | { 
| NOTES | NAME [LABEL | 
tee ae ee eee ee ee ee ee ee —}--—~---- 
The LOAD routine brings a module containing a specified | LOAD | 1Gc008 


entry point into virtual storage if a usakle cory is not | 

available. It increases ry 1 the responsibility and use | 

counts, and returns control to the requester. | 

1 LOAD calls DALPRFIX to ensure that the address of the 
entry-point name or PDS CE for the requested module is 
in real storage. 


DALPRFIX| DALPRFIX 


| 
GINREGS |GINREGS 
| 


2 The two high order bytes of the RBSTAB field in the 
SVRB (supervisor request block) are set to 1 to make 
the SVRB look like a PRB (program request blicck). Ncw 
ABEND can free the SVRB if the requester abnormally 
terminates. 


| 

{ 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| The address of the requesting JPAQ (job pack area 

| queue) is placed in register 8 in case LINK must con- 
| tinue to search for the module. Also, LOAD sets the 
| lower order bit in RBCEFLGS equal to 1 to indicate that 
| this is a load request. 

| 

| CDMOPUP 
| 

| 

{ 

i 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


if the requester is a ISO task, CDMOPUP does not 
increase the use count in the CDF. 


If the use count exceeds 4095, the requester is 
abnormally terminated. 
6 If no LLE exists, CDLDRET gets storage for an LLE and CCLDRET 
chains it to the caller's load list. If the caller is 
a nonpageable task and the requested module is in the 
LPA, the requested module is fixed by calling the PGFIX 
routine. 


CDLDRET increases the responsikility count in the ILE, 


and if it exceeds 255, the requester is abncrmally 
terminated. 
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From SVC SLIH after an XCTL 
macro instruction has been issued, 
to pass control to a requested 


module 
Input Processing 
IG C007 
Register 15 
Address of paramter list 8 (Qe -p—-7-CC--T 1. Ensure that the parameter list 


is in real storage. 


--- 2 lf the requester has issued a STAE 
1 without the XCTL option, free 
een the SCB, 


RB (requester's) 


3 If the requester is operating with 
an IRB or TIRB, set the caller's 
resume PSW to SVC 3, and call 
LINK, 


o=eruern=* TT 
i Seat ee wyika tte 
ae | ' 


TCBNSTAE SCBXCTLI 4 If the requester is operating with 


aan a PRB, queue it above the contents 
Pu: eS SCBXCTL2 
Ships i | 


- 


5 The requester is operating with 
an SVRB. 


6 If the requested module is found, 
initialize the new SVRB and exit. 


7 Search the LPA directory. 


8 if the module is not found, 
abnormally terminat the caller. 


Q Initialize the new SVRB, and exit. 
(See output from Step 6) 


supervision SVRB, and go to LINK. 


Diagram 4.8 
XCTL Routine 


FREEMAIN Routine 


RMBRANCH 
6.1 


LINK Routine (4.2) 


IGC003 
Remove PRB. 
Dispatcher passes 
control to LINK 
3.14 


Output 







5 
. 












CDSEARCH 


Search for the 
requested module 
in the LPA. 


LINK Routine (4,2) 






Register | 


Entry-point address of 
requested module 











Exit Routine 


Removes contents 
supervision's SVRB. 






JEAVVMSR Routine 


SRCHD IRC 


3.14 Register 15 









4,4 


Dispatcher (3.17) Step 1 


ERRORTAB Routine [7 
ERRBLDL ABEND 


IGCO001C 





Requested module could 
not be found 


8.14 
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Diagram 4.8 XCTL Routine (Module IEAVLKOO) 


Se a ee ee eee ee ee eS ee > = 5 eater one ’ 
| |ROUTINE | | 
| NOTES | NAME | LABEL | 
}----~---------~---_~~----------------—------~----------------4--.---- Se eee 
| The XCTL routine provides linkage to a specified load | XCTL {IGc007 1 
| module. The requested module is executed with the same key| | | 
| and in the same state as the requester. The XCTL rcutine | | | 
| itself completely services only XCTL requests fcr callers | | | 
| represented by an SVRB. XCTL calls the LINK routine to | | | 
| honor requests made by callers operating with a PRB cr IRB. | | | 
| | | | 
| XCTL ensures that the requester dces not regain control | | | 
| after the requested module has keen executed. | | | 
| | | | 
| 1 XCTL calls LXPREFIX to ensure that the parameter list | LXPREFIX|LXPREFIX | 
| is in real storage. | | | 
| | | | 
| 2 If the SCBXCTL2 flag in the SCBSTA 1s equal to 1, the | XCTL | STAELOOP | 
| caller issued a STA with XCTL option befcre issuing an | | | 
| XCTL. XCTL frees STAE SCBs that do not indicate the | | | 
| XCTL option. | | | 
| | | | 
| XCTL marks as noncancellable (sets SCBXCTL1=1) all | | | 
| STAESCBsS that indicate an XCTL oftion, and were rot | | | 
| issued by a supervisor program. The routine does this | | | 
| to prevent the Exit routine from freeing ther. | | | 
| | | | 
| 3 Setting the resume PSW to an SVC 3 instructicn causes | | IRBPROC | 
1 the requester to exit when the requested module exits. | | | 
| A requester represented by a TIRB follows this path to | | | 
| the CDADVANS entry pcint in LINK. | | | 
| | | | 
| 4 XCTL moves the caller's PRB ahead of the contents | | PRBPROC | 
| supervision SVRB on the RB queue. The Fxit routine | | | 
| removes the PRB, and when the task is next dispatched, | | | 
| processing continues at CDADVANS. | | | 
| | | | 
| 6 The XCTL routine sets the resune PSW (RECPSW) in the | | FOUNDUM | 
| recuested rodule‘'s SVRP tc the module's entry-point | | | 
| address. | | | 
{ | | | 
| 9 Same as Step 6. | | FOUNDEM | 
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Diagram 4.9 
DELETE Routine 


From SVC SLIH after a 
DELETE macro instruction 
has been issued 


Input Processing 
1GC009 
Register 0 
Add f entry-point 
1 Ensure that the input address is in 
real storage. 
Register 4 2 Search for the module to be 


deleted. Output 


Register 15 








Not found Caller via 
Exit routine 
3 Decrease the responsibility count (SVC 3) LLE 
in the LLE. 





LLECOUNT §£ 


‘ . 
4 





4 If the responsibility count equals 
0, free the LLE. FREEMAIN 
RMBRANCH 


6.) 
5 If the caller is in V=R storage, 
and the module being deleted 
is in the LPA, go to PGFREE. PGFREE Routine 
ee Free an LPA module 
loaded by a VER 








tas’, 


6 Decrease the use count in the FABAAE' 
CDE, and go to Step 8 if it does sg 
not equal 0. BWABRERREEREEERRGGEREE EEE QQaaCEaQGaEaE 





7 The use count equals 0. Mark 
the CDE no longer needed. 
en CDHKEEP 
Free CDE and module 





if not freed . 
if not freed above Recister 15 
3.14 g 


8 Zero register 15, and exit. a ee 


DELETE successful 


Caller via 
Exit routine 


(SVC 3) 
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Diagram 4.9 DELETE Routine (Module IEAVLKO00) 
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| NOTES | 
bea See eee Se a eee eee ee 
| When a module brought into virtual storage via the LOAD | 
| routine is no longer needed by the program that requested | 
| it, the requesting program issues a DELETE macrc instruc-_ | 
| tion. The DELETE routine then decreases Ly one the respon-| 
| sibility count in the lcad list element (LLE). When the | 
| responsibility count reaches zero, DELETE frees the LLE. | 
| If the module being deleted is not a TSO module or rerre-_ | 
| sented by a CDE in the TSLPA, the DELETE routine also | 
| decreases the use count in the contents directory entry | 
| (CDE). | 
| | 
| 1 DELETE calls DALPRFIX tc ensure that the address of the | 
| requested module's entry-point name is in real storage. | 
| | 
| 3 The LLE responsibility count is a record of the number | 
| of outstanding LOAD requests for the mcdule. | 
| | 
| 6 The CDE use count represents the total number of | 
| requests for a program via ATTACH, LINK, LOAD, and XCTL | 
| macro instructions. The count increases each time one | 
| of these macros is successfully issued, and decreases | 
| each time a DELEYVE is issued. | 
| | 
| The CDUSE and CDROLL fields contain the use count. The | 
| overflow from CDUSF is in CDROLL. When the count in | 
| these fields is zero, DELETE sets the CDATTR field tc } 
| indicate that the module is no longer usable. In this | 
| case, the CDHKEEP routine frees the real storage occu- | 
| pied by the program, its extent list, and its major and | 
| minor CDEs. | 
bie Sesame ee Se et ee ee ee le ee es 4 


= 
| ROUTINE | 


NAME 


DELETE 
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Diagram 4.10 
IDENTIFY Routine 
From SVC SLIH after the 


IDENTIFY macro instruction 
hsa been issued 
Processing Output 


IGC041 


Input 







Each time one of the steps places 
one of the return codes below in 
register 15, IDENTIFY returns to 
the caller via the Exit routine. 


Register 0 


Address of module name, — 
or 0 (major request) 


Register | 





1. Ensure that referenced addresses 
are in real storage. 








X'10' = Caller is not operating 
with a PRB. 





Requesting program must be 
operating with a PRB. 


Address of entry-point 
address, or parameter 
list 







X'18' - Invalid parameter list. 


Register 5 X'1C' - Invalid extent list or 


module address. 





3 If this is a request for a major 


CDE, check for errors in Error 
request, BC 


IEAQCDSR 


Search JPAQ, LPAQ, 
and TSLPAQ, 


Found er YX } 






X'20' - An extent address is not 
in subpool 0, 


X'04' - Entry-point name and 
address already exist. 
4 Search for duplicate module name. 





X'Q8' ~- Entry-point name 
duplicates the name of 
a load module 
currently available. 













X'14' - An IDENTIFY macro 
instruction was 
previously issued using 
the same entry-point 
name but a different 
address. 





5 Check validity of request. 





Validity Check 


JEAOVLOO 






3.19 





6 Determine where the minor CDE Invalid 
should be built and get storage, 

or get storage in subpoo! 255 for 

a major CDE. 






X'OC' - Entry-point address is 
not within an elegible 
load module. 












GETMAIN Routine 


X'00" - Successful completion. 


(a> 
(er 
(o> 
(> 
(F > 
> 
(Hy> 
CP 






Initialize and chain the CDE (and 


extent list if major CDE) in CDE 
queues == 1) 









Caller via 
Exit Routine 


(SVC 3) 
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Diagram 4.10 IDENTIFY Routine (Module IEAVIDOO) 
eS ee ee Toso oe ea oa ar ee 1 


eo ee OE ee ee i " - nn aee se e - 


| ROUTINE | 


| 
NOTES | NAME [LABEL | 


The IDENTIFY routine informs the supervisor of a module's’ |ICENTIFY|IGCO41 
embedded entry-foint name (a name that was not established | 
by the linkage editor). IDENTIFY informs the superviscr fry| 
creating a mincr CDE (ccntents directory entry) to repre- 
sent the embedded entry-point name. 


The IDENTIFY routine can also build a majcr CLE and an 
extent list in subpool 255 for a module brought directly 
into storage by the loader. This allows the supervisor to 
identify the mcdule. 


saat, 


w 


a a a a ee a ee i es a ee ee ee hee a eh ae ee 


If register Q equals 0, a major CDE is requested. In IDPREFIX| IDPREFIX 
this case, IDPREFIX ensures that the parameter list cr 


entry-point address in register 1 is in real storage. 


If register 0 contains an address, IDPREFIX ensures that 
the address of the mcdule name is in real stcrage. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Beginning with this step, all rcrccessing to kuild a MAJORCDE| MAJORCDE 
major CDE is handled ky a sukroutine of IDENTIFY, called 
MAJORCDE. Because MAJCRCDE rerforms the same functicns 
as IDENTIFY does to kuild a minor CDE, it is shown in 


Steps 4-7 above along with IDENTIFY processing. 


Minor CDES may be built in the JPAC, TSLPAQ, or LPAQ, 
depending upon where the major CDE is located. 


-—— 


| 

| 

| 

| 

| 

| 

| 
tL 
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From requester via branch or 
Second Level Interruption 
Handler to load requested 
overlay segment. 


Input Processing 









Register 0 IGC037 


0 indicates SEGLD 
Nonzero indicates SEGWT 1 If the requested overlay segment is 
in virtual storage, and ENTAB is 


Register 1 prepared to branch to it, go to 
ENTAB. 
















ENTAB entry address of 


requested overlay segment 2 Issue a LINK to IEWSZOVR in the 
overlay supervisor. 


IEWSZOVR 
Registers 1 and 2 same as above 


Register 9 3 If the overlay segment is in virtual 


storage, go to: 
Overlay segment number Pete 


Register 12 e Step 7 for BR or CALL. 


e Step 8 for SEGLD or SEGWT entry. 
Address of SEGTAB 


If the overlay segment is being loaded 
for a previous SEGLD request, wait 
for the loading to complete. 












| SEGLD Processor | EGLD Processor 


5 Update status indicators in SEGTAB SEGLD OVALO2 : 
and ENTAB. Request loading of 











overlay segments. 





Completion flag 
6 Request loading of overlay segments 
marked in SEGTAB; go to: 
e Step 7 for BR or CALL 
e Step 8 for SEGLD or SEGWT entry. 





Alter ENTAB entries to permit 
unassisted branch to overlay 
segments. 


8 Check for error conditions. 


ENTAB, which 
branches to the 
requested overlay 
segment 














Program Fetch 


Load requested 
overlay segments. 


4.12 






ABTERM 


IEAOABOO 







8.12 


SEGTAB or ENTAB 
for branch to 
requested overlay 
segment 





Diagram 4.11 
Overlay Supervisor 
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Diagram 4.11 Overlay Supervisor (Modules ILEWSUOVR and IEWSWOVR) 
ee a ee ee ee too 
| ROUTINE 
NOTES | NAME 
ae aa SAGAS SSRN ORI PONS IE, EE SEPT SESE {---—--- 
Overlay iS a programming technique that minimizes the |Overlay 
virtual storage requirements of a frogram. When the over- |Super- 
lay technique is used, a program is divided into overlay |viscr 


segments, each of which can contain up to 524,288 Lytes of 
text. The overlay supervisor directs the loading of these 
overlay segments as they are requested. 


When an overlay program is link-edited, the linkage editor 
builds an SEGTAB (overlay segment table), and one or more 
ENTABsS (entry tables). It wakes these tables part of the 
overlay module. 


There is only one SEGTAB in an overlay program. The SEGTAB 
describes (1) the relationships cf overlay segments in the 
program, and (2) which overlay segments are in virtual 
storage or being loaded. The SEGTAB is the first rpeortion 
in the root overlay segment, which contains control infcr- 
mation for the overlay program and remains in virtual 
storage while the overlay program is being executed. 


There can be an ENTAB in each overlay segment of the pro- 
gram. The overlay supervisor uses the ENTAEB to determine 
which overlay segment must ke loaded when a branch instruc- 
tion or macro instruction refers to an overlay segment not 
in virtual storage. 


The overlay supervisor gains control when an overlay seg- 
ment issues a SEGLD or SEGWT macre request (SVC 37) for 
another overlay segment, or when an overlay segment issues 
a CALL macro (SVC 45) or branch instruction to an address 
in another overlay segment not in virtual storage. The 
caller enters the resident overlay nodule, IEWSUOVR. This 
module checks the validity of the input parameters and then 
issues a LINK to module IEWSWOVR using its alias name, IEW- 
ZOVR. If a usakle copy of IEWSWOVR is found, it is 
executed; otherwise, a copy is fetched into virtual 
storage. IEFWSWOVR marks the overlay segments to be over- 
laid, determines which new overlay segments should ke 
loaded, and branches to Program Fetch to read the overlay 
segments into virtual storage. A separate Franch to Fro- 
gram Fetch is made to read each cverlay segment. 


i a a 


fe ae er me ee a a a ee ee a ee ee eT, 5 ater eR SS SS= 
|ROUTINE | 
NOTES | NAME | LAPEL 
In both cases, the overlay supervisor examines the SEGTAB |Overlay 
to determine whether the requested overlay segment is |Super- 
already in virtual storage, and whether all overlay seg- | visor 
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ments between the requested overlay segment and the rcct 
overlay segment are in virtual storage. All must Le in 
virtual storage, and if they are not, the overlay supervi- 
sor calls Program Fetch to load then. 


After the required overlay segments are in virtual storage, 
if the caller has issued a CALL or Lranch instruction, the 
overlay supervisor alters the ENTABs of the loaded overlay 
segments. The modified ENTABs permit future branches tc 
loaded overlay segments without help from the overlay 
supervisor. 


Finally, depending on how it was called, the overlay super- 
visor passes control to the: 


e Caller before loading is complete (SEGLD) 
e Caller after loading is complete (SEGWT) 


® Branch address in the requested overlay segment after 
it is loaded (CALL or -ranch instruction). 
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Diagram 4.12 (Steps 1-7) 
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Diagram 4.12 (Steps 1-7) Progran Fetch (Module IEWFETCH) 
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The Program Fetch routine, which is a single module in the 
nucleus, loads modules for supervisor routines. It trans- 


fers modules into virtual storage from libraries (organized | 


as partitioned data sets) on direct access storage devices. 


Program Fetch reads a module into a continuous Elock of 
virtual storage, and relocates address constants in the 
module. 


The subroutines of contents supervisor that search for 
requested modules and the overlay supervisor use Prograr 
Fetch to load modules. 


The searching subroutines of contents supervision enter 
Program Fetch after a LINK, LCAD, XCTL, or ATTACH macro 
instruction has been issued, and a usable copy of the 
requested module is not available in virtual stcrage. 
this type of entry, Program Fetch transfers the entire 
module from auxiliary storage tc virtual storage. 


For 


The overlay supervisor enters Program Fetch after a SEGWT, 
SEGID, or CALL macro instruction, or after a instruction 
has been issued for an overlay segment that is not in vir- 
tual storage. For this type of entry, Program Fetch loads 
only the requested overlay segment. 


In loading a nonresident module or an overlay segment, the 
major phases of Program Fetch processing are: 


e Initialization. Program Fetch initializes a fetch 
work area, builds an extent list, and (if the rodule 
is in an overlay structure) fetches the module's ncte 
list. 
module. 


e Loading. Program Fetch calls channel frograns that 
transfer text records, RID records, and control rec- 
ords into virtual storage. 


e Relocation. Using the RLD records, Program Fetch 
changes the values of the address constants in the 
loaded program from auxiliary storage addresses to 
virtual storage addresses. 


e Terminaticn. Program Fetch checks the completion of 


I/O operations, calculates the relocated module entry- 


point address in virtual storage, initializes the 
overlay segment table (if the module is in overlay 


structure), sets up a return code, and returns contrecl 


to the calier. 


1 Steps 1-5 are the initialization process performed by 
Program Fetch. During initialization, Program Fetch 
calls GETMAIN to get the virtual storage it needs for 
module loading. 


NO 


The extent list contains the virtual storage address of 
and the length of each section of a module eligible for 
loading. Program Fetch issues a GETMAIN macro instruc-— 
tion to obtain storage for an extent list (and a note 
list if the module is in overlay). GETMAIN returns the 
extent list address and places it in the CDE. 
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It can process several load requests concurrently. 


Program Fetch gets virtual storage for the load 
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If the module being loaded is in overlay, Program Fetch 
initiates channel programs that read the note list into 
storage (storage obtained during extent list proces- | 
sing). The linkage editor placed the note list in the 
overlay module. The note list contains the relative 
disk address (TTR) for reading each overlay segment of 
the module. The TTR of the note list is obtained frem 
the PDS DE, converted to an aksolute disk address, and 
used in the EXCPVR channel request to read the ncte list 
into virtual storage. After the note list has been 
read, Program Fetch kuilds a note list prefix that it 
uses when called to load an overlay segment. 


Program Fetch initializes a work area whose address is 
furnished by the caller. It places in the work area 
information that it will use to load the requested 
module. This information consists of: 


e An input/output Elcck (IOB). The IOB provides infor- 
mation that is needed by the I/O supervisor. 


e Two event control blocks (ECBS). One ECB is posted ry 
the I/O supervisor when a channel-end condition 
occurs. The other is posted by a PCI appendage rou- 
tine when a progran-controlled interruption occurs in 
a channel program. The posting of either ECB fermits 
the Program Fetch to be restarted after an I/O wait 
interval. 


e Three channel programs. The channel programs are 
Similar. They are used to overlap the reading of one 
or more module records with the relocation of address 
constants fointed to Ly a previously loaded RL- 
record. 


e Three RLD kLuffers. Fach kuffer is 260 bytes long and 
is capable of holding an RLD record, a control record, 
or a composite control and RLD record. 


e A buffer table. This takle contains a 12-kyte entry 
for each RLD buffer. Each entry contains: 


e A pointer to the next entry. 
e The address of an RLD kLuffer. 
*e The address of a channel program. 


e® A text table. This takle is used in CCW translaticn, 


and contains: 


e The address of the text CCW currently active in 
the channel program. 


e The virtual location at which the above CCW is 
reading text data. 


In addition, Program Fetch requests storage for 
another work area if the DCB (data control block) 
does not reference either SYS1.LINKLIB, SYS1.SVCLIBE, 
or JOBLIB. 


| Program 
| Fetch 


——<— 


The I/O supervisor then passes control to the page fix 
appendage (PGFX). The PGFX appendage creates a fix list 
in the fetch work area. This list contains doukleword 
entries; each entry gives the low and high virtual 
addresses of storage tc he fixed for the I/O request. 

In this manner, page faults are avoided when the I/0 
supervisor or appendages address the fixed storage. 
Included in the 1ist are: 


e CCB for the module's data set. 


e The text burfer defined ktefore issuing EXCPVR. 
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{ Program Fetch builds a DCB in the work area; tne | Program Other areas referenced during the I/O request are in the|Program | 
| only valid field in this DCB is a pointer to the | Fetch fetch work area (fixed for the duration of the loading |Fetch | 
| DEB. Before ccfying the DEB into the work area, | operation) Or are resident in the system nucleus. Cnce | | 
| Program Fetch calls the CEBCHK routine tc check the | the fix list 1s created, the I/O supervisor regains con-| | 
| validity of the CER. The DCB and DEB are used for | trol; register 10 contains the address of the fix list, | | 
| all I/0 requests. | is register 11 contains the number of entries in the 
| | ist. 

| 5 Preparing for Execution of a Channel Program Program | | { 
| Fetch passes to the I/O supervisor an absolute disk | Before starting the channel ercgram, the I/O supervisor | | 
| address at which the first I/O operation is to keégin. { enters the Fetch Start I/O Appendage routine. On the | | 
| It does this by: | first entry to the Start I/O Appendage fcr a loading | | 
| | operaticn, all channel programs are translated. On sub-| | 
| ® Obtaining the relative track and record address | sequent entries for the same load cferation, the only | | 
| (TTR) of the first text record from the data set | CCWs requiring translation are those that read the | | 
| directory entry, or obtaining the TTR of the needed | module text records. The other CCWs all address the | | 
| segment from the note list. | nonpageakle fetch work area, so they are valid unless | | 
| | the page containing the work area has keen swapred into | | 
| ® Converting the relative address to an absolute | a new real page. When a new page is encountered, the | | 
| address, via a branch to a "convert" routine that is| Start I/C Appendage translates all channel frograms | | 
{ resident in the nucleus. | again. 
| ® Placing the absolute disk seek address in the Pro- | The text CCWs are treated separately and are translated | | 
[ gram Fetch input/output block (IOB), for later use _ | on each entry to the appendage. They are translated | | 
| by the I/O supervisor. | from infcrmation in the text table. For text CCWs that | | 
] | cause page boundaries to be crossed, an IDALI is created. | | 
| The absolute disk seek address used for subsequent I/O | All real addresses are oktained using the LRA instruc- | | 
| requests is obtained from count data which is read while| tion. Control is then returned to the I/O supervisor. | | 
| loading the text records. | ; ; { | 
{ | The 1/0 supervisor issues a Start I/O instruction, fol- | | 
| The extent of the wodule*’s virtual storage area (text | lowed by a Stand-Alone Seek command. The Stand-Alone | | 
| buffer) to be fixed is calculated for each I/O request. | Seek command moves the access arm of the direct access | | 
| This crcvides real storage for the text CCWs that are | device to the seek address contained in the IOB. The | | 
| introduced in the channel program switching process. | I/O supervisor, via a Transfer in Channel command, then | | 
| The buffer begins at the point when Program Fetch is | passes control to a fetch channel frogran, whose address | | 
| currently loading text records, and is 18K bytes lcng, | the Pregram Fetch routine placed in its IOB. The fetch | | 
| unless the end of the module is encountered first. | channel program causes the first text record to Le read | | 
| | into virtual storage. The I/0 supervisor returns con- | | 
| Program Fetch starts a channel program by issuing an | trol to Program Fetch to wait for fosting of an event | | 
| EXCPVR macro instruction to cbtain supervisor linkage to| cortrol tlock by the I/O supervisor or an appendage rou-| | 
| the I/O supervisor. The I0B address is provided as an | tine. Such posting indicates that one or twe records | | 
| operand of the macro instruction. | have been read and that further processing can occur in | | 
| | Progran Fetch. | | 
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Diagram 4.12 (Steps 8-15) 
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Diagram 4.12 (Steps 8-15) Program Fetch (Module IEWFETCH) 
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Switching of Channel Programs: Each channel program 
reads a text record followed by an RLD or control 
record, or it reads only the RLD or control record. 

When a text record is not followed by a control record, 
the next channel program switches to single-record mode. 
The single-record mode continues until a control record 
is encountered causing a switch to two-record mode. 


A CCW in each channel frograr causes a progran- 
controlled interruption (PCI). The PCI causes the I/0 
supervisor to pass contrcl to the PCI appendage routine. 
The appendage examines the current RLD buffer to deter- 
mine the channel program switching reguired, and 
operates as follows: 


e If the next RLD kuffer is filled, the next channel 
program cannot be used, so chaining is suppressed 
and a “kuffers full" condition is indicated. The 
current channel frograr is nct altered. 


e If the current RLD 
the NOP CCW in the 
altered to TIC the 
or RLD record into the Program Fetch work area. 
TIC address is translated using the LRA instruction. 


buffer contains an RLI record, 
current channel program is 


e If the current RLD buffer contains contrcl informa- 
tion, the text CCW in the next channel program is 
initialized. Before chaining is attempted, however, 
the extent of the read is examined to determine 
whether it exceeds the text buffer fixed for the 
current I/O request. If the fixed limits are 
exceeded, the current channel program is not altered 
and a “kuffer full" condition iS set. If the text 
buffer is not exceeded, the current channel frogram 
NOP is altered to TIC to the next channel program to 
read a text record, and a control or RLE record 
after the text CCW and TIC address have been 
translated. 


e If the current RID buffer contains an RLE record 
With the end-of-module indicator, the “end" flag is 
set. If the buffer contains a control record with 
the end-of-module indicator, the next channel pro- 
gram is prepared to read a text record cnly and the 
"end" flag is set. 


In all the above cases, the fetch ECB is posted to pre- 


pare the Program Fetch routine fcr restart by the dis- 


patcher, and control is returned to the I/O supervisor. 
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The Channel-End Appendage routine is entered by the I/0 
supervisor when the channel frogram has terminated. 
appendage returns control to the I/O supervisor to post 
the I/O ECB when channel end is due to the fact that: 


e The entire module cr segrent has been loaded. 
e A buffer-full condition is indicated. 
e A permanent I/O error has occurred. 


When none of the above conditions is present, channel 
end occurred because the TIC instruction was stored by 
the PCI Appendage after the channel had fetched the NOP 
ccW. In this case, the Channel-End Appendage routine 
returns control to the I/O supervisor to restart the 
channel frogran. 


Program Fetch is restarted after the PCI Appendage rou- 
tine or the I/O supervisor has posted an ECB. The relo- 
cation subroutine of Program Fetch then examines the 
buffer table to determine whether an RLD reccrd (con- 
taining relocatakle address constants) is in an RLD 
kuffer. The subroutine searches for a buffer takle 
entry whose "busy" indicator is set. The indication 
means that the asscciated buffer contains an RID record. 
When such a kuffer is found, the relocation subroutine 
relocates each address constant specified in the record. 
(When RLD records in all "kusy" cuffers have been pro- 
cessed, Program Fetch either restarts a channel frogran 
if the “"“kuffer full" flag is on, or issues a WAIT macro 
instruction to await the loading of another record. 


The relocation subroutine adjusts the value cf an 
address constant by comrkining (adding or subtracting) a 
relocation factor with the value cf the constant. Each 
RLD record contains the linkage-editor-assigned address 
of the constant and a flag that indicates additicn or 
subtraction cf the relocation factor. 


If the linkage-editor-assigned address of the constant 
yields a location outside the storage area assigned to 
the load module, no storing takes place. Control is 
then passed to the Termination routine. 


If the control record before the next text reccrd con- 


tains an "end" indicator, the PCI Appendage routine sets 


an “end" flag to inform the termination subrcutine. 
After relocation has keen performed, a test of the 
flag causes the subroutine to be entered. 


"end" 


The Termination routine performs its processing cr 


waits, depending on whether all I/0 operations have been 


completed. When all I/C operations have deen conpleted, 
the subroutine places a completion code in the return 
register. 


The relocated entry-point address is calculated and 
placed in a register fcr use ky the caller. If the 
module loaded was the root segment of an overlay fro- 
gram, the address cf the DCB and the note list are 
placed in the segment table for the overlay sufervisor. 
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The VS2 system enables programs to occu- 
py an address range greater than the 
address range of real storage. This 
address space is called virtual storage and 
is divided into 4K klocks called pages. 
These pages may reside in a portion of 
auxiliary storage called external page 
storage, in page frames in real storage, in 
neither, or in both. The paging supervisor 
manages the exchange of virtual pages 
between real and external page storage. 


Whenever a program references a virtual 
address contained in a page that is not in 
real storage, the CPU generates an inter- 
ruption which causes control to be given to 
the paging supervisor. The paging supervi- 
sor moves a copy of the needed page into a 
4K page frame in real storage. When the 
page is in real storage, the referenced 
virtual address is translated into the real 
storage address of the data. The entire 
paging operation and translation process 
are transparent to the programmer, allowing 
him to use the virtual address space as 
though it were real storage. 


ORGANIZATION OF THE PAGING SUPERVISOR 


The paging supervisor is composed of 
four subcomponents: 


e Real Storage Administration, which 
Maintains a record of the status of all 


pages in real storage and processes any 
request involving the allocation, 
release, or change in status of a real 
storage page. 


e Page Administration, which processes 
all requests for movement of pages from 
real storage to external page storage 
and vice-versa. 


e Interface Control, which controls the 
flow of a request through the paging 
Supervisor, provides interfaces to the 
paging supervisor service routines, and 
controls most of the external inter- 
faces into the paging supervisor. 


e Auxiliary Storage Administration, which 
manages the external page portion of 


auxiliary storage. 


See "Section 10: Program Organization" 
for a list of modules in each subcomponent 
and the routines within each module. 


HOW PAGING IS SUPERVISED 


ENTRIES TO THE PAGING SUPERVISOR 


The paging supervisor receives control 
in one of five ways: 


1. When a missing page interruption 
occurs, the paging supervisor receives 
control through the Program First- 
Level Interruption Handler. (A mis- 
Sing page interruption, also called a 
page fault, indicates that a fage con- 
taining a referenced virtual address 
is not in real storage.) 


2. When pages must be moved between 
external page storage and real 
storage, the paging supervisor 
receives control from the dispatcher 
through normwal disrfatching procedures. 
(A special task, called the paging 
task, runs as the highest priority 
task in the system, and handles 
delayed [queued] paging requests. 
Because the paging task is the highest 
priority task, the system is able to 
save CPU time by bypassing the Task 
Switch routine when the paging task 
must be dispatched. ) 


3. Upon occurrence of a channel end 
interruption (CE) or an I/O error ona 
previously started paging operation, 
the paging supervisor receives control 
through an I/O supervisor appendage. 


4. When an SVC instruction requesting a 
paging supervisor service is executed, 
the paging supervisor receives control 
from the SVC FLIH. 


5. The paging supervisor also receives 
control when a branch entry is made 
into a paging supervisor service 
routine. 


See Diagrams 5.1 through 5.5 for the 
functional flow through the paging supervi- 
sor after each type of entry. 


PAGING SUPERVISOR ALGORITHMS 


The paging supervisor attempts to make 
the most efficient use of real storage by 
keeping only needed pages in real storage 
and by moving pages no longer needed to 
auxiliary storage devices. It also tries 
to conserve CPU time by paging only when 
necessary and by limiting the amount of 
time that can Le spent on paging opera- 
tions. To do these things, the paging 
supervisor uses two algorithms: the page 
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replacement algorithm and the task disable- 
ment algorithm. 


The Page Replacement Algorithm 


To facilitate moving pages into real 
storage, the paging supervisor maintains a 
list of page frames that are not being 
used. This list is called the available 
page queue. 


Whenever the number of available page 
frames (the availakle page count, or APC) 
falls below a predetermined value, the pag- 
ing supervisor replenishes the available 
page queue by stealing a page frame from a 
program. The PFTE (page frame table entry) 
representing the stolen page is moved from 
one of the queues representing page frames 
in use to the available page queue. If the 
page occupying the page frame has been 
changed, the page is moved to external page 
storage, replacing the previous external 
storage copy before the page frame is made 
available. The stealing of pages continues 
until the APC has been incremented to the 
predetermined value. 


The paging supervisor uses the page 
replacement algorithm to decide which page 
frames are to be stolen. This algorithm 
reduces the number of page-outs Ly attempt- 
ing to select the least-used pages and by 
minimizing the stealing of changed pages. 
See Figure 5-1 for an example of the opera- 
tion of the page replacement algorithn. 


Page frames are selected for realloca- 
tion according to the settings of the 
reference and change bits. These bits are 
part of the storage keys for the page frame 
and are modified by the CPU each time a 
page is referenced or changed. By examin- 
ing these bits, the paging supervisor 
determines which pages are least needed 
(assuming the page that has not been 
referenced for the longest time is the 
least needed), and makes the page frame it 
occupies available for reallocation. The 
algorithm is biased to select unchanged 
pages whenever possible because the page 
frames that they occupy can be made avail- 
able immediately: there is no need to wait 
for the page to be written to external page 
storage. 


Six queues of PFTEs (which represent 
page frames) are used: an available page 
queue, a hold page queue, and four active 
page queues. The available page queue con- 
tains the PFTEs for the page frames that 
are available for immedate allocation. The 
hold page queue contains PFTEs for page 
frames that were recently allocated and are 
therefore unlikely candidates for replace- 
ment. The four active page queues repre- 
sent all page frames that are now in use by 
programs but can be made available for 
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reallocation. (PFTES can also reside on a 
seventh queue, the SQA/LSQA reserve queue, 
which is not used for page replacement.) 


There is one active page queue for each 
fossible configuration of the reference and 
change bits. Reference and change bit set- 
tings are denoted as R,C so that 0,0 indi-~ 
cates that the virtual page has neither 
keen referenced nor changed. The meanings 
of the four possible bit configurations are: 


R,C Meaning 
0,0 The virtual page has not been 


referenced since the last inspec- 
tion, and has not been changed. 


0,1 The virtual page has not been 
referenced since the last inspec- 
tion, but was changed at some pre- 
vious time. 


1,0 The virtual page has been 
referenced since the last inspec- 
tion, Eut has not Leen changed. 


a eras The virtual page has been 
referenced since the last inspec- 
tion, and has keen changed. 


Each queue is maintained in a first-in, 
first-out order, thus preserving a record 
of the comparative longevity for each page. 


The reference and change bits are set 
automatically by the CPU. Since pages are 
constantly being referenced and changed, 
the bit settings may not be the same when 
interrogated as when the PFTE was first 
placed on a particular queue. As the pag- 
ing supervisor serially searches the 
queues, it steals those page frames whose 
Status has remained unchanged. Those page 
frames whose status has changed (that is, 
their reference and change bits are not the 
Same as those of the active page queue they 
are presently on) are moved to the appro- 
priate queue. However, before placing the 
PFTE on its new queue, the paging supervi- 
sor resets the reference bit to zero. It 
is this resetting of the reference bit to 
zero that makes unreferenced but changed 
pages (0,1) possible. The change bit is 
never reset during PFTE movement. 


The processing of this algorithm is per- 
formed ty the Page Replacement routine 
(Diagram 5.15). 


The Task Disablement Algorithm 


The numker of paging operations, and 
consequently the amount of time spent pag- 
ing, depend on the number of programs 
active in the system and the number of pag- 
ing requests they generate. If tco much 
time is spent paging, system performance 
can be seriously degraded. To prevent this 





condition, known as thrashing, a task dis- 
abling algorithm is periodically 
implement ed. 


At predetermined intervals, the paging 
supervisor compares the number of Read I/0 
operations generated by paging requirements 
against predetermined high and low paging 
threshoids and number of reclamations 
(reuse of the contents of an available 
page) against high and low reclaim thre- 
Ssholds. If too much paging and reclaiming 
has been done during the last interval, one 
of the lower-priority active tasks is dis- 
abled. If more paging and reclaiming 
should be allowed during the next interval, 
a previously disabled task is reactivated. 


The processing of this algorithm is per- 
formed by the Task Disablement routine 
(Diagram 5.19). 


PAGE MANAGEMENT 
Control Blocks and Tables 


To efficiently manipulate pages and to 
Maintain records of the status of page 
frames, the paging supervisor maintains 
three tables and uses the reference and 
change bits. 


A page frame is represented by a PFTE 
(page frame table entry). The information 
in the PFTE and the settings of the 
reference and change bits reflect the sta- 
tus of a page frame. As described above 
(under “The Page Replacement Algorithm"), 
the PFTEsS are the items that are moved 
among the available page queue, the hold 
page queue, and the active page queues. 


Since a virtual address may exist in 
both real and external page storage, two 
tables must be kept to associate virtual 
addresses with their locations in the two 
places. The PGT (page table) is composed 
of 16 contiguous 2-byte PTEs (page table 
entries). Each entry contains the address 
and the availability indicators for the 
real storage page frame with which a parti- 
cular virtual address is associated. See 
Figure 1-1 for an illustration of the use 
of a page table. One PGT exists for each 
segment of assigned virtual storage and can 
be accessed through the segment table entry 
for that segment. 


Associated with each PGT (except those 
for the resident nucleus, SQA, and V=R seg- 
ments) is an XPT (external page table) com- 
posed of 16 contiguous 8-byte XPTEs 
(external page table entries). Each XPTE 
contains the location of the external 
storage page assigned to a virtual address 
and the status information germain to that 


1 virtual address space. 


External Storage Management 


Since pages for a program need not Le 
contiguous on external page storage 
devices, the paging supervisor attempts to 
use paging devices efficiently by assigning 
pages so as to minimize rotational and seek 
delay. Unless a specific external address 
is specified in the page-out request 
(directed page-out), the Auxiliary Storage 
Manager (Diagram 5.63) chooses page slots 
cn the primary paging device that has the 
most pages available. A target siot is 
then chosen in the last cylinder used (for 
movable-head devices) or the next slot that 
will pass the read/write head (for fixed- 
head devices). 


To further minimize paging delays, an 
attempt is made to use rapid-access device 
as primary paging devices first and to put 
pages on slower (designated as secondary) 
devices only when necessary. Migration of 
pages from primary to secondary devices 
(performed by the Migration routine, Dia- 
gram 5.62) occurs only when the number of 
availakle pages on primary devices becomes 
too small to keep paging efficient. 


Real Storage Management 


Real storage is divided into two major 
parts: that which is permanently allocated 
for supervisor use (nondynamic storage) and 
that which is eligible for paging (dynamic 
storage). Dynamic storage is further 
divided by a V=R line. Storage below this 
line is eligible for use by (but may not be 
exclusively used by) nonpagable (V=R, or 
virtual equals real) tasks. When storage 
below the V=R line is used for a V=R task, 
there is a correspondence between the vir- 
tual and real addresses. 


V=R Allocation: A V=R region must ke loaded 
into contiguous real storage. The paging 
supervisor attempts to keep a section of 
storage kelow the V=R line “nonpolluted*” 
(not long-fixed and, if possible, not used 
for SQA or LSQA) so that it is available 
for V=R regions. Whenever a real storage 
page must be long-fixed or allocated to SQA 
or LSQA, the paging supervisor attempts to 
find an available page above the V=R line 
first. If, however, a page is needed and 
only pages below the V=R line are avail- 
able, a V=R page is allocated. 


If, while a page below the V=R line is 
in use ky one task, that in-use page is 
needed by a V=R task, the faging supervisor 
attempts to move the contents of that page 
to an available page above the V=R line. 

If that is not possible, the V=R allocation 
request is deferred until that page can ke 
Made available. 
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This series of diagrams shows the movement of PFTEs among paging supervisor 
queues to illustrate the operation of the page replacement algorithm. Starting 
with the case where all page frames are available for allocation, the diagrams 
follow a typical page replacement sequence. 


1 Initially, all PFTEs are on the available queue, the available 
page count (APC) is 12, and all the active queues are empty. 
In this example, the low threshold value is three and the re- 
placement count is three. 


LOW THRESHOLD 


2? As page frames are allocated, their PFTEs are placed on the 
hold queue. This step shows that ten page frames have been 
allocated. The allocation of page frames one through ten 
leaves only two PFTEs on the available queue. The next time 
the paging supervisor receives control, it must replenish the 
available queve to bring the available page count up to its 
high threshold value of five. 


3 When the paging supervisor regains control, it places the entire 
hold queue on the 0,0 (unreferenced, unchanged) queue. By 
this time, some page frames have been referenced and some 
changed (as shown by the settings of the referenced and 
changed bits in the PFTEs). 


REFERENCE BITS 


CHANGE BITS 


e Figure 5-1 (part 1 of 2). 
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Movement of Page Frame Table Entries (PFTEs) j 


4 Next, the paging supervisor serially searches 


the 0,0 queue for unreferenced and un- 
changed page frames that it can steal for the 
available queue. As it examines each PFTE 
in turn, the paging supervisor places those 
PFTEs for referenced or changed page frames 
on the appropriate active queue and sets 
their reference bits to zero, It places PFTE 
1 and PFTE 4 on the 1,0 (referenced, un- 
changed) queve, places PFTEs 2, 5, and 7 


This step shows the PFTE queues after page 
frames represented by PFTEs 11, 12, and 2 
have been reallocated and placed on the 
hold queue. Note also that the reference 
and change bit settings have been changed 
for PFTEs 1 and 4 on the 0,1 queue and for 
PFTE 3 onthe 1,1 queue. Page frames 1 
and 3 were referenced and page frame 4 was 
beth referenced and changed after the 
paging supervisor gave up control following 
step 4, The effect of the resetting of these 
bits is that the paging supervisor will move 
these PFTEs down the active queues and 
thereby reduce the chance that they will be 


The paging supervisor moves PFTE 8 to the 
available queue because it is unreferenced 
and unchanged. It moves PFTEs 9 and 10 to 
other active queves. The replacement 
count has not yet been completed, so the 
paging supervisor must continue searching 
for page frames to steal to replenish the 
available queue. The paging supervisor 


(which were unreferenced and unchanged) 
directly on the available queve, and sets 
their reference bits to zero. The addition 
of three PFTEs (PFTEs 2, 5, and 7) to the 
available queve has completed the replace- 
ment count (three). The search for page 
frames is ended when the paging supervisor 
places PFTE 7 on the available queue and 
the paging supervisor gives up control. 


stolen. The reallocation of the page frames 
represented by PFTEs 11, 12, and 2 has 
reduced the available page count to below 
the low threshold value (three), 
Consequently, the available queue must be 
replenished by stealing page frames from 
those represented by the PFTEs on the active 
queues, The problem program to which the 
pages were allocated is given an opportunity 
to use those pages before the page frames 
that they occupy are made available for 
stealing. By placing PFTEs 11, 12, and 2 
on the hold queve, the paging supervisor 
removes them from immediate consideration 


continues by searching the 0,1 queve, but 
in this example that queue is empty. Since 
the paging supervisor steals from the 0,0 
and 0,1 queues only, these queues must be 
replenished before PFTEs can be taken from 
them to be placed on the available queue. 


The paging supervisor moves the entries from the 1,0 queve to 
the 0,0 queve, moves the entries from the 1,1 queue to the 
0,1 queve, and moves the entries from the hold queue to the 
1,0 queve. Then it searches the new 0,0 queve. 


8 PFTEs 1 and 4, whose bit settings changed when the paging 


supervisor gave up control after step 4, are moved to the 1,0 
and 1,1] queues respectively. PFTE 10, being unreferenced 
and unchanged, is placed on the available queve. Next, the 
paging supervisor serially searches the 0,1 queve. 


Page frame 3 was referenced after step 4, so 
the paging supervisor moves its PFTE to the 
1,1 queve. Since all the PFTEs on this 
queue have been changed, the virtual page 
occupying any of the page frames represent- 
ed by these PFTEs must be moved to external 
page storage before the PFTE can be placed 
on the available queue, The paging super- 


eFigure 5-1 (part 2 of 2). 


visor moves PFTE 6 to the available queve 
after moving the contents of the page frame 
it represents to external page storage. The 
replacement count has been completed and 
the search is ended. 
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Section 5: Paging Supervision 


Fixing Pages: It is impossible to tell 
when any page in the dynamic area will have 
to be paged out. Since, under certain con- 
ditions such as I/O buffering, it is neces- 
Sary to keep a page in real storage until 
it is no longer needed, the ability to fix 
a page is provided. The fixing of a page 
makes that page ineligible for paging until 
that page is explicitly freed. 


Fixing too many pages can seriously 
degrade real storage use and fixing pages 
below the V=R line can prevent a high 
priority V=R task from obtaining needed 
storage. Therefore, the number and loca- 
tion of fixed pages in the system is care- 
fully controlled by the supervisor. The 
fixing and freeing of pages are functions 
of the Page Service Interface FIX/LOAD and 
FREE routines (Diagrams 5.21 and 5.22). 


REQUEST MANAGEMENT 


Since not all requests for paging ser- 
vices can be handled immediately, a control 
block must be used to represent requests 
for paging of, or status modifications to, 
pages and the storage with which they are 
associated. This block (the page control 
block, or PCB) is queued to one of ten PCB 
queues. Eight of the queues has an asso- 
Clated processor that handles the type of 
request represented by PCBs on that queue. 
(The other two queues have no processors 
and contain completed PCBs or PCBs for 
which I/O is in progress.) The queues are 
scanned in priority order by the Queue 
Scanner (Diagram 5.53) and when one is 
found with requests for paging supervisor 
Operations on it, its processor is given 
control. 


PCBs are placed on PCB queues only when 


the paging service they require cannot be 
immediately performed. When the paging 
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task (the section of the paging surfervisor 
that handles queued requests) is dis- 
patched, these queues are searched and 
their requests fullfilled. For example, if 
a task requests that a virtual page be 
copied into real storage from external page 
Storage (via a page fault), the PCB for 
this request might be queued and moved as 
follows: 


1. A PCB is obtained from the free PCB 
queue or, if none is free, a new PCB 
is kuilt. The PCB is then initialized 
to contain perinent information akout 
the request type and to contain poin- 
ters to table entries associated with 
the page requested. 


2. A real storage page is allocated. If 
one is not immediately availakle, the 
PCB is placed on the real storage 
allocation queue to await processing. 


3. When allocation of a real storage page 
is complete, the PCB is moved to the 
page I/O initiation queue to await 
scheduling of the I/O operation 
required for the page-in. 


4. When I/O cperation has been scheduled, 
the PCB is moved to the I/O active 
queue to await completion of the I/O 
operation. 


5. When the I/O operation has completed, 
the PCB is moved to the free PCB queue 
to be used for another later request. 


This processing is transparent to the user 
so that it appears to him that he has just 
referenced an address in real stcrage. 


See Diagram 5.2 for a list of all PCB 
queues, their processors, and the flow of 
control after the Queue Scanner is 
dispatched. 
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Name for Paging Supervision 
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e Diagram 5.1 
Missing Page Interruption Processing 
A page is referenced that is 
not in real storage. The 
hardware generates program 
interruption code X'11' 


PROGRAM-CHECK FIRST-LEVEL 
INTERRUPTION HANDLER 


Determine whether a SPIE has 
been specified for code X'11'. 


User-Specified 


If so 
SPIE Exit Routine 





IEAPIX 


Obtain a PCB for this request. 





Build PCB Routine 
. 5.49 


DISPATCHER Check the validity of the request, find Poge Rouririe 


Locate the PTE 





INTERRUPTED 


s Give control to the proper 


task: 


and XPTE for the 





page. 


If an error is found Paging Supervisor 
Error Recorder 


Place the system 
in a disabled wait 
state, 


e To the paging task (See 
Diagram 5.2) if further 
processing is needed to 
fulfill this request. 









To the next ready task 
otherwise. 





Allocate a real storage page 
frame, 


Real Storage 
Allocation Routine 


Assign the page 
most efficiently, 


PAGING TASK 
or 


NEXT READY TASK 





Place the PCB on the appropriate 
PCB queue if further processing 
is required, 


Move PCB Routine 


Move the PCB to 
the indicated 
PCB queue. 







Indicate a task switch, if 
necessary, 
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A task switch to the paging task 
is indicated because PCBs have 
been added to the work queues. 






DISPATCHER 


Give control to the 
paging task to handle 
the PCB queues. 3.17 










Search the PCB queues in priority 
order until one that can be 
processed (that has work on it 
and resources available for it) is 
found. Pass control to the 
appropriate queue processor (see 
table at right). 


















Appropriate Queve 
Processor 


Fulfill requests 
represented by 
PCBs on this queve, 





When there are no more queues 
that can be processed, place 
this task in a wait state and 
return control to the dispatcher. 








DISPATCHER 


Give control to the 
highest priority 
ready task, 
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PCB QUEUE 
NUMBER (by 
priority) QUEUE NAME 


Real Storage 
Allocation 
Queve 


Auxiliary 
Storage 
Allocation 
Queve 


Page I/O 
(Initiation) 
Queue 


Migration 
Queue 


Swap 
Queue 


Reserve 
Replenish 
Queue 


Delayed 
Pasting 
Queve 


Task Post 
Queve 


1/O Active 


Queve 


Free 
Queue 


PROCESSOR 
JEAPALOC 
(Diagram 5.6) 


IEAPAUXS 
(Diagram 5.43) 


IEAPIOS 
(Diagram 5.44) 


IEAPMIGR 
(Diagram 5,62) 
IEAPSWAP 
(Diagram 5,36) 


IEAPSQA 
(Diagram 5.8) 


IEAPSI3 
(Diagram 5.25) 


IEAPTQP 
(Diagram 5,28) 


* Diagram 5.2 


Queued (Delayed) Request Processing — 
Paging Task 


REASON FOR PLACING PCB ON THIS QUEUE 


A real storage page was needed to satisfy a request, but 
none was available. 


An external storage (auxiliary) page must be assigned for 
a page-out request. 


The I/O operations required for page-outs or page-ins must 
be initiated, 


Pages must be moved from primary to secondary paging 
devices to make paging more efficient. 


A swap operation was requested via SVC 115 and the Swap 
Interface routine (IEAPSSVC) has placed PCBs for the 
request on this queve. 


A real storage page must be freed to replace a page 
reserved for emergency SQA use because a page reserved 
for SQA or LSQA has been used or the count of available 
pages reached zero and replacement could not be 
scheduled. 

Note: There is always a PCB on the queue; the above 
situations cause the queue to be unlocked. 


A request for a page service that could not be immediately 
performed has now been completed, but the system was 
handling a disabled page fault at completion time. 


A page was reclaimed in the process of a page-out, or an 
1/O event for a request represented by a PCB has 
completed. Post processing is needed but will not be 
initiated by an |/O interruption. 


A paging !/O operation has been initiated to satisfy the 
request represented by this PCB. 


A request has been completely satisfied and this PCB is 
no longer needed. These PCBs are available for use in 
handling other requests, 


* These queves are not checked by the queue scanner, but PCBs are routed to them by some of the 
queue processors. 
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e Diagram 5.3 (Page 1 of 3) 
Page I/O Interruption Processing 
i/O Interruption 


1/O FIRST-LEVEL 





INTERRUPTION HANDLER (I/O FLIH) 


1/O SUPERVISOR 


When a paging supervisor 
channel program caused 
the interruption, go to 
the appropriate 
processor: 


Channel End Channel End Appendage 


I[EAPCEAP 


Free resources no longer 
needed. Set the post-work bit. 


If an I/O error 7 


Keep the channel active if 

possible. Page I/O Supervisor 
IEAPIOS 

Attempt to append 


Return the RQE to 
its logical channel 
queue but do not 


post the issuer. Restart was successful 


channel programs 


(CPQEs) to the IOB. 
5.44 


Free the RQE but 
do not post the 
|/O complete, 





No restart 





(or) 


(Continued) 
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I/O SUPERVISOR (CONT'D) 


IEAPABNA 


6G For a nonpermanent error, free unneeded 
resources. Set post-work bit. 


Error Recovery Programs Attempt retry. 


Attempt error 


7. For a permanent error: 
recovery, 


For READs = Mark the PCB for |/O error 
so that IEAPIOP will cause 
that task to abnormally 
terminate, 

For WRITEs - Route the PCB to the auxiliary 
storage allocation queue to 
attempt a page-out to a 
different location, 

Route failing page-out PCBs to the auxiliary 

storage allocation queue and page-in PCBs 

to the task post queue. 


If unsuccessful 
(permanent error) 
If successful 





Channel End 
Appendage 


I/O FLIH 


If a paging I/O operation 
has been completed, 






Page 1/O Post Routine 


IEAPIOP 


1 If the I/O operation has been cancelled: 
Make page frames available 
for V =R pages 


For non-V =R pages 


Free external page storage 


(Continued at Step 2) 5,28, 5.29 








e Diagram 5.3 (Page 2 of 3) 


Page |/O Interruption Processing 


[EAPCBM 


queues, 


IEAPVRS 


Allocate newly available 

V =R intercepted pages to 
deferred region allocation 
requests. 


IEAPRLS2 
Add nonintercepted PFTEs to 


the available page queue. 


[EAPAUX2 


Release indicated external 
page storage. 


Move PCB Routine 


Place the PCBs on the appropriate 


5.48 





Auxiliary Storage Manager 


5.63 


nt 


|/O FLIH 


DISPATCHER 


e Diagram 5.3 (Page 3 of 3) 
Page |/O Interruption Processing 


Page |/O Post Routine (Cont'd) 


2 If there is an |/O error, or a page-out 
operation has completed: 
Make pages available for 
V =R intercepted pages 















IEAPVRS 

Allocate newly available 
V =R intercepted pages 
to deferred region 
allocation requests. 


For nonintercepted pages 










IEAPRLS2 


Add nonintercepted PFTEs 
to the available page 
queue, 






3 If a page-in operation has completed: 
Allocate the pages 









JEAPRLS2 
Add the PFTEs to the hold 
page queve. 


For V =R intercepted pages 







IEAPVRFL 
Finish V =R allocation of 


intercepted es, 
4 Signal completion to the I/O initiator: i 


When no associated root PCB exists 
and: 






An error is indicated 


Paging Supervisor Error Recorder 


|EAPSER2 
Log the error 


1EAQDS02 
Perform task switching. 3.17 


5.16, 5.24, 5.39 


Release Queue Suppression Routine 


IEAPCRQS 
Release the page I/O queue. 




















No other action fs 
waited on 





"No-post" indicated 
An associated root PCB exists and: 
No other PCB is associated 
















Other PCBs associated, continue 


Allow the page !|/O queue to be processed 
Pp 






3.51 


Move PCB Routine 
IEAPCBM 


Move PCBs to the free queve or 
to the migration queue, 







6 Remove PCBs from the I/O active queve. 














5.28, 5.29 5.49 
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C 


A PGRLSE, PGFIX, PGLOAD, 
PGFREE, or SWAP macro instruction 
generates SVC 112, 113, or 115. 





SVC FIRST=LEVEL INTERRUPTION 
HANDLER (SVC FLIH) 


For SVC 112 (release request by 


user or supervisor task) 








Cc 


e Diagram 5.4 (Page 1 of 3) 
Page SVC Interruption Processing 


Release Routine (LEAPCLR) IEAOVLOO 


IGC112 
Check validity of input (user request). 


Ensure real storage 


protection, 





Release the specified pages: 
Locate table entries, 


Find Page Routine 


IEAPFP 


Find the PGTE and XPTE 
for the page. 





PFTE Dequeue Routine 


|EAPRLSS 


Remove the PFTE for this 
page from its present 
queve. 


If there is a real storage page 
allocated 





Allocate intercepted pages 
to V =R storage. 


V =R Release Routine 


IEAPVRS 


Allocate a page to a 
deferred V=R 
allocation request. 





PFTE Enqueue Routine 


IEAPRLS2 
Add the PFTE to the 
available page queue. 


Make the page available, 


5.17 


Auxiliary Storage Manager 


IEAPAUXS 


Release specified external 





Release associated external page 
storage, if there is any allocated. 


5.30 - 5.33 


‘LALLA 


page storage. 


5.63 





Type 1 Exit 
Routine 


9TZ 


SVC Interruption 





SVC FLIH 


For SVC 113 (supervisor or 
authorized program request) 





2.2 


Page Service Interface Routine (IEAPSI) 


IGC113 


Determine the type of request. 


RELEASE 


FIX/LOAD 


Scan the input parameter list for 
validity and fix those pages already 
in real storage. 


Initiate page-ins for pages not in 
real storage: 


Get a PCB for the I/O request. 


Locate table entries. 


Get areal storage page frame. 


Initiate I/O, if necessary. 


(Continued) 
5.20, 5.21 


e Diagram 5.4 (Page 2 of 3) 
Page SVC Interruption Processing 


Release Routine 


IEAPCLR2 


Release requested real 


storage and external 
page storage. 





5.3] 


Type 1 Exit Routine 


Translate Real to Virtual 
Routine 


IEAPTRV 


Get virtual address of the 
input real address. 
5.47 


|} Build PCBRoutine ld PCB Routine 


IEAPC BB 





Obtain PCBs for the root PCB 
and for pages to be paged in. 


5.49 


| Find Page Routine 





IEAPFP 


Locate the PGTE and XPTE 
for this virtual page. 





5.27 


Real Storage Allocation 
Routine 
IEAPLOC 


Assign a page frame, 
into which information 
can be paged in. 





Move PCB Routine 


IEAPCBM 
Place the PCB on the 


appropriate queve. 


5.48 





Type 1 Exit Routine 


c 


gs Butbed :G uot RO—aS 
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e Diagram 5.4 (Page 3 of 3) 
Page SVC Interruption Processing 


Page Service Interface Routine (Cont'd) 


FREE 


Delete suspended fixes. 


Decrement fix counts on indicated pages. 


Free pages no longer fixed: 


PFTE Enqueve Routine 


(in real storage) 









































Add the PFTE to the hold 
page queue. 5.17 
(not in real storage) Find Page Routine 
|IEAPFP 
Locate PGTE and XPTE 
Intercept the root PCB. for the incoming page. 
5.27 
Allocate intercepted pages to 
V =R storage. V =R Flush Routine 
IEAPVRPL 
Allocate pages to deferred 
V =R region requests. 
5.13 
cidiidetuereciseiaass: 
rT ee 
Release freed page. 
SVC Interruption 5.3] 
Initiate fixes suspended because of . : 
threshold restrictions, Type | Exit Routine 
5.20, 5,22 
SVC FLIH 
For SVC 115 (SWAP) SWAP SVC Interface Routine (IEAPSSVC) 
IGC115 Build PCB Routine 
|EAPCBB 
Initialize and queve necessary PCBs 
to initiate swap processing. Get requested PCBs. 
| Move PCBRoutine —_| PCB Routine 
IEAPCEM 
Put PCB on the swap queue 
and the root PCB on the 


swap root queue. 
5.48 


Type 1 Exit Routine 
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CALLER 


GETMAIN 


FREEMAIN 


GETPART 


FREEPART 


i/O Supervisor 


[/O FLIH 


Program FLIH 


Recover 
Management 
Support (RMS) 


Error Recovery 
Procedures (ERPs) 


ABEND 
ASIR 
EOT 


ABTERM 


TSO Quiesce 


TSO Restore 


REASON 


A request for SQA or LSQA space requires a new SQA 
page. 


At least one whole virtual page has been freed. 

A new region is to be allocated. 

A region is to be freed. 

A new nonpageable (V =R) region is to be allocated. 


A paging service is needed to complete an I/O 
operation, 


Requests represented by a PCB have been completed by 
an I/O operation. 


A translation specification error {program interruption 
code X*12") has occurred. {f the faulting task is fn 
supervisor state, a major error is indicated, If the 
faulting task is in problem program state, a minor error 
is indicated. 


An error has been encountered in real storage. 


An intermittent or solid error has been encountered. 
An intermittent error has been encountered, 


An intermittent error has been encountered and the 
page is marked for V =R interception. 


An ERP that is retrying a failing paging I/O operation 
needs to access storage for which it has only the real 
address. 


Paging for a TCB, RB, or both must be purged due to 
either abnormal or normal termination, 


A task tried to schedule the paging supervisor for 
abnormal termination due to an invalid request, or a 
program check occurred in the paging supervisor 
causing entry to ABTERM, 


A TSO region is being quiesced. 


A TSO region is being restored. 
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Diagram 5.5 
Branch Entry Page Processing 


BRANCH ENTRY PAGE PROCESSING 


ROUTINE 


CALLED 
SQA/LSQA 
Allocation 


Page Release 


Create Page 
Table 


Destroy 
Page Table 


V=R 


Allocation 


Page Service 
Interface 


Page I/O 
Post 


Paging 
Supervisor 
Error 
Recorder 


Translate 
Real to Virtual 


Find Page 
PFTE Dequeue 
PFTE Enqueve 
V=R 

Release 
Translate 


Real to Virtual 


Termination 
Interface 


ENTRY POINT 
AND DIAGRAM 





NUMBER 


IEAPSQAT, 
Diagram 5.8 


IEAPCLR2, 
Diagram 5.31 


IEAPTCD, 
Diagram 5,34 


IEAPTCD 
Diagram 5.35 


IEAPVRAL, 
Diagram 5.10 


IEAPSIBR 
Diagram 5.20 


JEAPIOP, 
Diagram 5.28 


IEAPSER, 
Diagram 5.54 


IEAPTRV, 
Diagram 5.47 


IEAPFP, 
Diagram 5.27 


IEAPRLS3, 
Diagram 5.18 


JIEAPRLS2, 
Diagram 5.17 
IEAPVRS, 
Diagram 5.11 


IEAPTRV, 
Diagram 5.47 


\EAPTERM, 
Diagram 5,57 


IEAPFIXP, 
Diagram 5.58 


PAGEHOOK, 
Diagram 5.57 


IEAPFIXQ, 
Diagram 5.58 


IEAPFIXR, 
Diagram 5.59 


FUNCTION 





Allocate an SQA page. 

Release the real and external page storage associated with the freed virtual page. 

Create a page table and external page table for the region. Validate segment table entries. 
Free the page table and external page table for the region. Invalidate segment table entries. 
Attempt to allocate a region below the V =R line. 

FIX, FREE, LOAD, or RELEASE the page as requested, 

Clean up resources no longer needed for this PCB, and notify the supervisor of its completion. 


Major error -- inform the operator and place the system in a disabled wait state. 


Minor error «- inform the operator and schedule the task for abnormal termination. 


Find the virtual address corresponding to the input real address so that RMS can access the real storage while 
dynamic address translation is in effect. 


Find the page table entry and external page table entry associated with this virtual address. 
Remove the PFTE representing the bad page from its active page queue. 

Place the PFTE representing the page in error on the available page queue. 

Allocate the newly available page to a deferred V =R region allocation request. 


Find the virtual address corresponding to the input real address, 


Purge resources by TCB and RB fer abnormal termination. 


Purge resources by TCB only for normal termination. 


Free nonintercepted fixed pages and purge all FOEs for this TCB. 


Call IEAPSER to inform the operator and place the system in a disabled wait state. 


Quiesce all activity relating to fixes in this region. 


Restore all activity relating to fixes in this region. 


BTC 





From: Program FLIH to handle a program interruption 
for a page fault or a disabled page fault. 
FIX to allocate or reclaim a fixed page or do 
long-fix processing. 
Queue Scanner to process PCBs on the allocate 
queue. 


Input Processing 


|IEAPALOC 


Register 1 


If the PCB is to be skipped 


eeeeee 


—_—-—-—— 2 If the call is for long-fix processing 


3 If a page can be reclaimed or related 
Z 


and entry is from the Queue Scanner 


l 
| 
a Eee | 


| t 
11 uy 


-------- 


== 4 If a page is available 


A. If a page is not available and it is 
not a disabled page fault 


B. For adisabled page fault 


C. If execution of the SQA/LSQA 
Allocation routine was successful 
D. If unsuccessful and: 


® This is a branch entry. 


e This is an entry from the 


PVT Queue Scanner. 


PVTAFST (for PFTE index) 


| pe ee re ee eee A eee A 


5) Allocate the found page 
XPTE 


XPTPROT —_—_— ent ae et et ee me 


L-_5 


PCB 
PCBVBN 
5A 





PCBRTP 


(Continued at Step 6) 







(8) 


and entry is not from the Queve Scanner O—S Ee 3 


Diagram 5.6 (Steps 1-5) 
Real Storage Allocation Routine 
(Allocating a Page Frame) 


Output 


PCB 
PCBNQN=PCBTSKPQ 


PCBIOI=1 


PCBXPT=0 


PCBNQ N=PCBFREE 













RECLAIM 


Locate a reusable page. 
Sif 


_ es 7 





SCNSF=1 in PVTALOCQ 
ge 


ARAWAWAVATaT 


> 5 


ZanUBBRABABRABRBRBRBAA 


Serre ee rey. 3 


sense n PTAC 
PCB 


PCBNQ N=PC BALLOC 







SQA/LSQA Allocation 


IEAPSQA2 
Attempt to find a 
usable page. 




















Call 
ee Register 15 


Return code = 8 


¥, 
ArRUBRUBARRRRRARRBEREE ABER RREEREEEEESEEE 


PFTE Dequeve PCB 


\EAPRLS3 PCBRBN 
PCBVBN 


Remove the PFTE from 
the available queue. 
PGTE 
PGTRSA 


i} 
Ye, 












5.18 
BARRA AAAARRE RE RERRERESSEAREEEEEREE EE 


JSTCBSUB NN Ne PFTE 


Update PFTWHOSE. 2, 


JZARRALRRRRARRRRRRRERERERS 





PFTONAVQ=0 






PFTPCBSI=1 
PFTWHOSE 
PFTVBN=PCBVBN 


S burbeg :G uotRZOAaS 
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Diagram 5.6 (Steps 1-5) Real Storage Allocation Rcutine (Module IEAPALOC) 


a ei re a a Pe ee ee re er ee eA Earn Tira ias a= coe | aaa a aa a a ce a oe g deeannen a a Serie 
| |ROUTINE | | | [ROUTINE | 
| NOTES | NAME {LABEL | | NOTES | NAME | LABEL 
|------------------------------------------------------------4-------- +-------- }----------------------------—------------------------------- -------- $-------- { 
| 1  PCBIOI is set to 1 before PCBSKIP is examined. If | IEAPALOC|QSENTRY | | | | 
| PCBSKIP=1, route the PCB to the task post queue and | | { | 5 The storage key for the allocated page frame is set to | | APCNZ 
| check the next PCB. | | | | the storage key found in the XPTE. Deferred release is | | 
| | | | | indicated if necessary (PFTDFCLR=1 if PCBDFCLR=1). If | | 
| 2 An attempt must be made to keep long-fix pages above | | | | the page was found by the SQA/LSQA Allocation routine, | | 
| the V=R line. | | | | the call to PFTE Dequeue routine is skipped. | | 
| | | | | | | 
| 3. «© If the request was not satisfied, continue normal | | | | 1 e Register 1 contains a positive PCB address if the | | 
| processing. | | | i entry is from the Queue Scanner. | | 
| | | | | 
| e If the request was satisfied by RECLAIM, access the | Lace SORE | e Register 1 contains a negative PCB address and: | | 
| next PCB. | | | | | | 
| | | | | e PCBPEX is on for a page fault or normal fix request. | | 
| 4 If a page is available, continue normal processing. | | RECLFAIL| i | | 
| If a page is not availakle: | | | | e PCBDPF is on for a disabled page fault. | | 
| | | | | | | 
| A Suppress the real storage allocation queue to pre- | | SQAFAIL4 | | e PCBLFR is on for a long-fix request. (A request to | | 
| vent reentry until at least one page is available. | | | | fix one or more pages for a relatively lcng time.) | | 
| B For a disabled page fault, attempt allocation from | |TRYSQA | | | | 
| the SQA. If a page is found, continue ncrmal pre-_ | | | | Py JSTCBSUB sets PFTWHOSE as follows: | JSTCBSUB| 
| cessing. If nc fage can be found, route the PCB tc | | | | | | 
| the real storage allocation queue. | | | | A If “no-post" is indicated (PCBNOP=1), the TCB | | 
| C For a PCE not on the real storage allocation queue, | | | | addressed ky this PCB or its Root PCB cannot be | | 
| route it to that queue. | | | | accessed. Therefore, PFTWHOSE is set to 0. | | 
| D For a PCB on the real storage allocation queue | | | | B If PCBTCF=1, the TCB address is in PCBRTP of the PCB. | | 
| attempt to satisfy the remaining requests if any | | | | If PCBTCF=0, the TCB address is in the PCBRTCB | | 
| with reclaimed pages. | | | | field of the root PCB rfointed to by PCBRTP. | | 
Geet ee ea ea Se ee eee cies ee ee es oe tl bese cat J | C If TCBSTI=0, PFTWHOSE is set to 0. { | 
| D If the page frame keing allocated falls within the | | 
| region associated with the current TCB, PFTWHOSE | | 
| is set to TCBJSTCB. Otherwise, it is set to 0. | | 
Dee ee ee ee ee a ee ee yaa re i eee eae ao 


Ay cs ee cen cs ce ms cs ce cr ce ee ee ee 
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¢ Diagram 5.6 (Steps 6-11B’) 
Real Storage Allocation Routine 
(Allocating a Page Frame) 


Input Processing Output 


XPTE 6 If th P PFTE Enqueve CB 
_ ovate of Webs 
XPTXAV ——i allocation of the page IEAPRLS2 POHINGIN-PGEEREE 


Add the PFTE to the PFTE 
PFTPCBSI=0 


Page Frame 


i] 


hold queve. 





5.17 


Vv 


If not LWRRREREREE EEEEEEEEREEREER CEREEGEEREEEREER 


pemenna®, 


Reference and Change Bits=0 


P 
PCB 


PCBNQN=PCBINIT 
PCBIOI=1 
(cw > 


PDTE 


ee ae 8 For non-Queue Scanner entries: euuuenenenanesd(D) 
If a channel program for the page-in can 

be appended to an active OB, attempt 

to append it. PFTE 


PFTLNGFX=1 
PAGE I/O S i : 
Q Access next PCB. PS | Cee Register 15 


IEAPIOS3 MW Return Code = 0,4,8,12 
5,44 






CB 
PCBLFR _—sS- 7 ~=si(If fix accounting is needed Perform fix 
PCBFXC —-4 
PCBPEX 


accounting. 





é 
SSS GC) 
If all PCBs have been processed Caller 
Be: fong-hucirecess|ng 
PGTPVM — ——~—-+10 Determine whether a page frame is 
PGTRSA =— assigned in real storage or, if not, 
“d whether one can be reclaimed or 









RECLAIM 


Locate a usable page 
5.7 


| 
| 
| 
| 
l lenene a 15 
| 
| 
| 
| 


related, 


If related and: 


Queve Scanner entry ia 7 
Not Queve Sconner ent > § 


AVRBRRBRBERBRREREREREEREE ER 


; 


CB 
PCBXPT=O 


PVT 


PVTVEQR _ ——+F11 Determine whether the i 
4 page is = 
| above the V=R line. If not, > 12 PCBNQN=PCBFREE 


| PCBRBN=PGTRSA 








PCB 
A. If it is, or if it is short-fixed and JSTCBSUB PCBDFCLR=O0 
PCBFXC oe 4 not marked for interception, fix VAAN NY 
PCBDFCLR a iLwhereth ts. Update PETWHOSE. , PFTE 
| y) PFTDFCLR=1 







PETE | [2 


Se} Zr VeURBURRRRRARARURRaE SA ANAAAS 


FTVRINT ashes 
FIXACT 


Perform fix 
accounting. 


J PFTLNGFX=1 


B. If it is an entry from the Queve 
Scanner 





3 
(Continued at Step 11C) 
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Diagram 5.6 (Steps 6-11B) Real Storage Allocation Routine (Module IEAPALOC) 
a aaa a a a a aaa a aa a aaa a ac aa : SESE aa Sari rama = 
JROUTINE | | 
NOTES | NAME |LABEL | 
6 If the page has never heen pagedout (XPTXAV=0, that is |IFAPALOC|PAGECOM 
it is not on external page storage), the PGTE is vali- 
dated and the page is cleared to destroy any secured 
data in that page frame. If the page exists on external 
page storage, a page-in is necessary. 

7 If the Queue Scanner was the caller and the fix count NOTDFCLR 
in the PCB is greater than zero, fix accounting must ke 
performed. If PCBLFR=1, PFTLNGFX is set to 1. 

8 If the page has previously been paged out, and the TESTACT 
device is active (PDITACT=1), and: 


e The call is for a paging exception, or 


® The call is for FIX and it is not a Queue Scanner 
entry, the routine attempts to append the channel 
program to one already running on the device. 


APPENDON 
was for other than a paging exception, or the device 
was not active, or upon return from IEAPIOS3, return is 
made to the caller. 

Q Return code meanings are: CHECKAPC 
0 - Page is immediately available. 
4 - I/O must be performed. 

8 - Unsuccessful. 
12 


Related I/O must be performed. 


FIXREQ 


yg 


After the page is fixed, processing continues as though GVALID 
the request was satisfied with a reclaimed page. 

If deferred release is indicated (PCBDFCLR=1), the flag 
is reset to zero and PFTDFCLR is set to 1. Long-fix is 
indicated (PFTLNGFX=1) if the caller was the Queue 


Scanner. 


E} The number of fixes represented by this PCB is recorded 


| 
} 
| 
| 
{ 
[ 
{ 
{ 
| 
{ 
| 
{ 
| 
{ 
| 
| 
| 
| 
| 
| If the page has not previously been paged out, the call 
| 
{ 
| 
| 
| 
| 
| 
| 
| 
l 
| 
l 
| 
| 
| 
[ 
| 
I 
| 
| 
{ 
| in the PFTE. 


ce es a es a a i i ee ee 


-_— ee ee 
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Input 


PFTE 
PFTVRINT 





Diagram 5.6 (Steps 110-15) 
Real Storage Allocation Routine 
(Allocating a Page Frame) 


Processing 


a 3 
D. If it is short=-fixed and marked for interception Re a a 12. 


SQA/LSQA Allocation 
IEAPSQA2 


11 C. For other than a Queve Scanner entry 






12 Attempt to find a page above the V =R line. 





Find a usable page. 


5.8 
Output 
A. If ausable page cannot be found and the PCB 
is not marked for interception, fix the page 
where it is. > 1] 
PFTE 


B. If ausable page cannot be found and the PCB 


is marked for interception, find the root PCB, DWRABRRRRRRERREGAGE WARAARaBQaaaaaan 


POST Routine 


1IGC002+6 


e@ If the root PCB is not marked for 
interception 


Inform the waiting 


@ |f the root PCB is intercepted 


> 11 o Infor 
-s Inittator, 


1A 3.8 


13 Move the data from the page below the V = R line MO DESET Routine 


to the new page. Pel Change modes (relocate 





or nonrelocate). 











3.21 
PFTE Dequeve 
IEAPRLS3 
Remove the old PFTE from ete 
the referenced/ change PFTWHOSE=0 
queues. 
5.18 "Old" PGTE 
44 Make the old page frame available for allocation, LRRRBARRRARBRARRERRRRE DEERE ER EERRREE EGG PGTPVM=1 
PFTE Enqueue "New" PGTE 
A. If interception is not indicated JEAPRLS2 PGTPVM=0 
Move the old PFTE to 
the available queue. PGTRSA 
A Saiz 
| VE RRelease | = R Release 
B. If V=R interception is indicated IEAPVRS 
Allocate the page to 
a V =R region. 
1A 5.1 
SQA/LSQA Allocation 
15 Attempt SQA/LSQA allocation IEAPSQA2 
[rd Find a usable page. 
5.8 


IF successful eT 6 PETE 
ARAERRERARALRRRARARRTRARARARRRRRRREE 


aay 4 


If unsuccessful 
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Diagram 5.6 (Steps 11C-15) Real Storage Allocation Routine (Module IEAPALOC) 


ee a ie a es ea ge ge EPR Ce a ee ye ee ee eee eo iM er ange A aia ae a: | 
[ROUTINE | 


NOTES | NAME | LABEL 
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| 


If the page is marked for interception, the waiting 
initiator is posted with a code of 16 to indicate that 
the region represented by this root PCB cannot be com- 
pleted. 


—_h 
ie) 


The page below the V=R line ("old“) is invalidated, and 
the one above the line ("new") is validated. 


OTON 


—_> = 
uo >} 
re 2 


If unsuccessful, no pages are available and this PCB 
must be handled again at the next entry to this routine. 
If successful, normal allocation continues as if this 
was a request for other than a long-fix, except that 
long-fix is indicated (PFTLNGFX=1) if the caller was 
the Queue Scanner. 


FIXREQ 


ee es es es ee es ee ee ee ee 
Vege ces ee ce ce SE Se ce eS ee ai 


ne? 





Entered by Real Storage Allocation 
to find a reusable page frame 






Input Processing 
RECLAIM 
PGTE 


PGTRSA 1 Determine whether there is a page in real 


storage and whether this request is for a 
valid virtual storage block. If not 


PCB 
PC BPTE 
PCBVBN 


—-++ 2 Reclaim a page on the available queue if 
possible, 


eee eee 


_— -3 If a PCB does not exist 


(Continued at Step 4) 


« Diagram 5.7 (Steps 1-3) 
Real Storage Reclamation Subroutine 
(Reclaiming a Page Frame) 


Output 
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PrVAAVVAVAAAVVUVARRRARAVRALAAT SURNPY) Return coded | 
ia Paging Supervisor 
Error Recorder 


IEAPSER 


Log the error, 
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PFTE 


PFTONAVQ=0 
PFTHOLD@=1 
PFTE Dequeve 


: : IEAPRLS3 
SSO) Remove the PFTE from PCB 
the available queue. 
PCBNQ N=PCBFREE 
5.18 









(ays NEP 4 PGTE 
PGTPVM=0 
2A PFTE Enqueve 


IEAPRLS2 
Place the PFTE on the 
hold queve. 


PVT 
PVTNPREC=PVT NPREC+1 
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JSTCBSUB 


Update PFTWHOSE, 







Register 15 





5.6 


Caller 
Register 15 


NVARARARARURACAREPARARRRRRRBRRBRRREGH Return code 
Paging Supervisor 
Error Recorder 


IEAPSER 
Log the error. 
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*Diagram 5.7 (Steps 1-3) Real Storage Reclamation Sukrcoutine (Module IEAPALOC) 
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+ 
If the real storage address (PGTRSA) equals zero, the |RECLAIM 
virtual address is not associated with a page frame. 
If the virtual block numkers (virtual addresses asso- 
ciated with pages in real storage or in the frocess cf 
being paged out) in the PFTE and PCB do not point to 
the same block, the page has been marked nonallocatakle 
by RMS, or the page is allocated to a V=R region, the 
request is considered nonreclaimable. After issuing a 
console message with the appropriate code (0100,0101, 
0102), IEAPSER puts the system in a disakled wait 
state. 


as 


If the available bit is on in the PFTE, the page frame 
contained the data, but the page frame has been 
released and made availatle. 


ND 


3 It is first determined whether the page table entry has 
already been validated. After issuing a console mes- 
sage with the appropriate code (0100,0101,0102), 
IEAPSER puts the system in a disabled wait state. 


eee ew ce ee a ee oe eee 
-— 
ee 
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¢ Diagram 5.7 (Steps 4-5) 
Real Storage Reclamation Subroutine 
(Reclaiming a Page Frame) 


Processing Output 


—tT 4 Relate the request to an ongoing page-in, 
if possible. Relate PCB 
4. . lEAPCBR 
NN. (B) Associate the PCB to 


Register 15 


[_Retum code=12 | code=1!2 
yr, 


PCB 


Caller (BS PCBNQN=PCBFREE 


PCB for Page-out 


PCBSKIP=1 


an on-going request. 









— — ———+ 5 Reclaim a page scheduled fora page-out. MWRBARBRERRERRERER EEE EEE EE 


Paging Supervisor 
Error Recorder 


IEAPSER 
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PCB for Allocation Request 
PCBXPT=0 


PCBNQN=PCBFREE 


XPTXADDR 


If an invalid condition is found 








Log the error. 
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Return code=0 
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PCBRBN=0 
PCBDADDF=1 


PCBDADD=XPTXADDR 
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e Ciagram 5.7 (Steps 4-5) Real Storage Reclamation Subroutine (Module IEAPALOC) 
Ce i ea pie pe ee ee ee ae pore he ee Gaara aa a joss s oS 1 
| | ROUTINE | | 
| NOTES | NAME [LABEL | 


+ 
4 If the page is on its way into real storage cn tehalf of|RECIAIM |QLOOP 
another task, the current PCB is related to the active | 
PCB so that both PCBs will be posted when the page is | 
in real storage. | 
l 
5 If the page to be reclaimed is scheduled for a page out | LPAON 
and if XPTXAV=1, XPTXAV and XPTXADDR are set to zeros. | 
| 
| 
L 


-——— — — 


IEAPSER puts the system in a disabled wait state. 
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* Diagram 5.8 
SQA/LSQA Allocation Routine 
(Allocating a Page Frame 


Entered from Real Storage Entered from GETMAIN for the SQA or an LSQA) 
Allocation to obtain a page to allocate an SQA or Output 
for a long-fix or, if normal LSQA page 









allocation failed, for a 
disabled page fault 












Output from AQSEARCH 
Register | 












Processing 





JIEAPSQA1 PFTE index 
Register 15 
IEAPSQA2 AQSEARCH 








> 
Input MABABRRABERREERRREEEERES [Retum code id 


Other Output 
PGTE 


PGTPVM=1 


Find an available page 


1 Set entry switch and save area appropriately. above the VeRuline 









Register 1 Register 4 


Fe ae enn 


| 
| 2 Allocate an available page above the V=R 
line if possible. 





















































































































Register 1 | AAURABBABABRRBRRBBRBREEEREREp 77! 
g 1 
| _) p PFTHOLDQ=0 
o Nef FP ; 
| If successful bso 7 y |EAPFP1 PFTONAVQ=0 
| 3 > Allocate an unchanged, nonfixed page ea the PGTE for 
Input to AQSEARCH | avove the V=R line from the active page ~RURBRRRRREREGG EGGERS ' this page. 5.27 PVT 
| queve. PRABAEYPVTIBIGM=1 
PFTONAVQ _—— | If unsuccessful a> 4 IEAPSER Y = 
PFTFXCT 3A Place system ina y gras PFTLNGFX=O 
PETVRINT If Find Page is successful = 7 disabled wait state. p Y PVT 
5,54 
Eres If Find Page fails Y y) PVTSQACR-PVTSQACR®I 
PFTLNGFX p s SCNSF=1 (in PVTALOCQ) 
PFTPCBSI 4 Allocate an unchanged, nonfixed page J Vy 
PFTBADPG above the V=R line from the hold page IEAPMVPG é 4 
avr queue. 2 oe at above y V] PVT 
N the V=R line. 
oe If successful ma> 3: 5.14 PVTBIGM=) 
T ae 5 Allocate an unchanged, nonfixed page Y Y v Register 15 
TCBSCT — g y 
TCBSWA Ras If this page is on the available page queve ==> 7 WA BRARAE RES SEEE sp 
Guede. Head | If this page is on the hold page or active Release Queue Suppression LY PFTHOLDQ—D 
SWAHERST page queues a> 3 LRRABABABERERRRRREF IEAPCROS y) PFIONAVOS 
| eS G6 Determine entry type. For an SQA or TWABRARAREAEREBEGEEGGaGaa Ready the paging supervisor y) SEAVAGEE 
r | | LSQA call, allocate a reserved page. and the reserve replenish Y See 
SWAB aveve. 
SWABSEGX 1! | 7 5.51 y PFTVBN 
SWABNEXT | | MARBRRRRREEEREG‘Ggg GEE st ~~ 4s SFTTSO=I 
| For a disabled page fault or long~fix call, TAR BRBEEREEEEEE' as = 
PVT | | or if reserved page allocation fails Caller PGTE 
PVTVEQR | | . 7 Allocate the found page. PFTE Dequeve PGTRSA 
: [PGTPVM-0 sd 
CVT | fane(A) [EAPRLS3 
l | Dequeue the PFTE PVT 
CVTSHRVM | | from its queve. PVISQACT=PVTISQACT#I 
5.18 
| PVTBIGM=0 
PETE [| PVTBIGMD 
PFTONAVQ pepsin et | | If GETMAIN is the caller Register 0 
PFTE | | IEAPFP2 Address of allocated page 
PFTLNGFX | Find the PGTE for Register 15 
| If Find Page is successful or if this page. 
PVT _| | GETMAIN is not the caller 5.27 | 
PVTFSQAQ ¢-7- Storage Key 
PVTLSQAQ | If Find Page fails . IEAPSER Set to TCB!s key 
7 | : Real Storage Page 
Requester's TCB = Place system ina 





disabled wait state. cacti 
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e Diagram 5.8 SQA/LSQA Allocation Routine (Module IEFAPSQA) 
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1 the "IEAPSQ1 in control" bit is set at entry and turned 
off at all exits. 


If the “alternate” switch was not set by AQSEARCH (nc 
page exists below the V=R line either), control goes to 
Step 6. No data is saved from the input PFTE. 


Tne SQA reserve replenish queue is empty if PVTFSQAR=0. 


real storage allocation queue (SCNSF=1 in PVTALOCQ). 


If the request is for LSQA, PFTWHOSE is set to the 
requester"s TCB address; otherwise it is set to zero. 
PFTTSO is set to 1 only if GETMAIN is the caller and 
the TCB address is a TSO TCB. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Prepare the reserve replenish queue and suppress the | 
| 
{ 
| 
| 
| 
| 
| 
1 Register settings upon entry: | 
| 

| 

| 

| 


| 
2 | The Queue Search subroutine searches the queues cf PFTES|AQSEARCH 
for a page frame which is not LSQA (unless allocated to | 
a TSO task), changed, fixed, scheduled for use (has a 
PCB assigned), -or restricted from selection. A page 
is restricted if: 


If one is found, the PFTE index is put in register 1 and 
control is returned to the main routine with a return 
code of 0. If one could not be found, ccntrcel is 
returned with a code of 4. If one was found that meets 
all but the last requirement (the page is in the V=R 
region), its address is saved, an "alternate" switch is 
set, and control is returned with a code of 4. | 
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[ROUTINE | 
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| IEAPSQA2| 
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From GETMAIN: Register 1 - Negative virtual address 
for SQA 
Positive virtual address 
for LSQA 
Register 4 - Address of requester's TCB| 
From Real Register 1 - Negative virtual address |IFAPSQA2 
Storage for disakled fage fault | 
Allocation: Positive virtual address | 
for long-fix | 


IEAPSQA1 


| 
| 
| 
| 
It is marked for interceftion. | 
It is in LPA virtual storage. | 
It is in the input TCB‘s region. | 
It is in an SWA segment. | 
It is in the V=R region. { 
| 
| 
| 
| 
| 
| 
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Diagram 5.9 
Reserve Replenish Queue Processor 


Entered by the Queve 
Scanner to replenish the 
reserve queve for SQA 
and LSQA pages 


Input Processing Output 


JEAPRSRL 


Register | 


Address of first PCB on _ 
queve 


PVT 


PVTAPC 
PVTSQACR 
PVTRPLSW 


Page Replacement 
IEAPRLS 


PVT 
5.15 , 
2 Release the real storage allocation queve (A)ww | SCNSF=1 (in PVTSRRQ)_| 
and suppress the reserve replenish queve 


1. Add a page to the available page queue. 





y, 
PVTALOCQ (SCNSF s 
PVTLTH : : Auap>(A) Allow nal storage 
allocation. 
PVTVEQR oe 
PFTONAVQ=0 
oe PETLSQA=1 


Scanner 


PFTSQALR=PFTSQALR=1 


3 Add a page to the reserve replenish queve, PFTE Dequeve PFTLNGFX=1 


dany(s) 


|EAPRLS3 PFTVBN=0 


Remove page from the 
available page queve 


5.18 


For a page below the V=R line 


IEAPMVPG 
Get a page above 
the V=R line. 





5.14 


For a page above the V=R line PFTE Enqueve 


IEAPRLS2 
Add the page to the 





reserve replenish queve. 
5.17 





$G UOT}0aS 


Tbheg 


s bu 


uOTSTAIZAN 


TE? 


“~ 


Diagram 5.9 Reserve Replenish Queue Processor (Module IEAPSQA) 
re ee ee ee ee ee Toc ge meee eae carer 1 


ee ee ee ee ee ee 


Zz 
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As 


4 This is attempted when no pages exist on the availakle 
page queue or the numker of available pages is less than 
the low threshold, and replacement is allowed 
(PVTRPLSWAX' FF"), 


NO 


This is done when allocation is suppressed and 
the reserve replenish queue is full. 


This is attempted when the reserve replenish gueve is 
not full and there are pages available. IEAPMVPG is 
only called when the page is below the V=R line. 


w 


Note: See Flowchart 5-1 following notes for this dia- 
gram for processing logic. 
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e chart 5-1. Reserve Replenish Queue Processor 
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THE V=R LINE 
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NEEDED ABOVE THE V=R 
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() ES 0 
SAPCTS B SQANEED 
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IEAPIOP SHOULD NO PAGES 
UNLOCK RESERVE AVAILABLE PFTENQ PUT A 
REPLENISH QUEUE PAGE ON RESERVE 


REPLENISH QUEUE 






ES 
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REPLENISH PAGES 
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ES | 
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hEec 
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Address of parameter list 
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Address of region to 

be allocated, or 0 
Region size (in bytes) 
Address of initiator's TCB 


Address of initiator's ECB 


Size of scan area 
(in bytes) 


Address of scan area 


PVT 


PVTBASE 
PVTSQACT 
PVTLEXTF 


PVT BF XTF 
PVTLFXC 


PVTFXC 





PCBRCNT 


PVTROOT 





Entered by GETPART when 
initiator requests allocation 
of a V=R region 





Processing 
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IEAPVRAL 


Diagram 5.10 

V=R Allocation Routine 
(Allocating Page Frames 
for a V=R Region) 


0 
Create and initialize a root PCB to FO 4 
control deferred region allocation. 8 | 


Build PCB 
|” aearces 
eer noe 
Determine the status of the first (next) 5,49 Region size 
page frame PCBRVRCH 
Permanently unavailable Eee 4 


Temporarily unavailable aa 6 


Available, continue. 


Allocate the page to this region PFTE Dequeve g 


A IEAPRLS3 
VN AN Remove the PFTE from 








Y Register 15 
: 


Parameter List 


Region address=0 

PFTE 
PFTONAV@=O 
PFTVRALC=1 
PFTVBN 


PVTLFXC=PVTLFXC+ 
pages allocated 


AVAVTRRBABABAR PVTEXC=PVTEXC# 
pages allocated 


PVTVRINT=1 




















the available page queue. 


Determine whether more pages are needed. 


ites ae 2 (Arenal 


ARABBBABABBRRRRRERRAREAy 


If not, update system fix counts EEE 7 g 
Free V=R Pages 


Free page frames already 


allocated to this region. 
Determine whether the scan option was 


specified. B 


If not, or if so but there are not enough PSSSSSesStetsstss a a a aaa 
J | 


pages remaining in the area to be scanned 


to safisfy the request > S A 
If so, reinitialize the root PCB, a 


Defer the request until the page frame is node WRBEBABABRERRRRRE WRRRARRRRT 


available. If more pages are needed 


If not, update system fix counts and continue @_RRRRRRRRRGQGQRGQ Q' MBBRRRY p 
















Terminate this attempted allocation. 









Register 15 


’ 
’ 
RAPLieumame —] F 
Root PCB J 
, 
é 
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New starting address 


Region size from : 
parameter list 


Determine the region size and check for 


threshold violations. If not violated Free V=R Pages 


y Free page frames already 
Zxxd(5) allocated to this region. 
8A 2 | 





Register 15 
Determine whether immediate allocation RRBs’ 
can be made. If so Region Validation Root PCB 











ol 
4 

PCBFREE 
as 
32 

PGTE 

PGTPVM=0 

sesp> < | PGTPAM=1 


Allocated Region 


sine 


WALREERBERRREREY 


Move PCB 


JEAPCBM 
Move the root PCB 


to the free queue. 
5.48 


Validate PGTEs and 
set protection keys, 


\ \ 


VAAN AAYN 








Anny(c) 
BA 





When the request has been deferred, TRRRRAREEREERERERH 


V=ER Flush 


JEAPVRFL 
Try to finish V=R 


attempt further allocation procedures. 









region allocation. ") Register 15 
5.13 ARARABABRBARERR EAP] Return code=Oor 12 | | Return code=O or 12 | rn code=0 or 12 


Caller 
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e Diagram 5.10 V=R Allocation Routine (Module IEAPVEQR) 
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PVTPCVRA is turned on at entry and off at exit. 
Deferred allocation will be necessary if all needed 
pages are not immediately availakle. 


The page frame is permanently unavailakle if it is: 
¢ Allocated to SQA/LSQA (PFTLSQA=1) (unless TSO). 
e Long-fixed (PFTLNGFX=1). 
e Marked damaged after a machine check (PFIBADFG=1). 


The page is temporarily unavailable if it is currently 
in use for other than the above reasons. 


Page replacement is Llocked during the call to the FFTE 


Dequeve routine (PVTBIGM=1 while FFTE Degqueue has 
control). 


An internal counter cf page frames needed is decremented 
and tested. If it equals zero, no wore pages are needed. 


The length of the area examined = the beginning address 


of the region - (the keginning address of the unavail- 
able page + 4096). 


If the scan area size minus the unusable area size is 
greater than or equal to the requested size, the 
request can still be fulfilled. 


The intercept bit is turned on (PVTVRINT=1). These 
routines that make pages availakle test FVTIVRINT prior 
to placing the PFTE on the available page queve. If 
PVTVRINI=1, they call IEFAPVRS (Diagram 5.8-2) to 
allocate the page frame for a deferred request. For 
each fixed page, an internal counter is incremented to 
be used in threshold checking. 


The PFTE address is calculated as follows: 
Region address 
PFTE address = 256 +PFTE°® address. 


PFTE® address is the address of the PFTE for the page 
frame whose real address is zero. 


The number of page frames to be allocated is equal tc 


the region size divided ky 4096. This is also the nunm- 


ber of PFTEs that are examined to allocate this regicn. 


The new long-fix count that would result fron this 


number of pages kecoming allocated to V=R is calculated 


as follows: 
"count” = PVTBASE-PVISQACT-PVTLXFTF-pages in request. 


If "count" is less than PVTLFXC, the threshold will 
be violated. 


The new fix count that would result from this number of 
pages becoming allccated to V=R is calculated as follows 


*“count™ = PVTBASE-PVISQACT-PVIBFXTIF-pages in request 
+ count of fixed page in this region. 


If “count™ is less than PVTFXC, the threshold will ke 
violated. 


[ROUTINE | | 
| NAME [LABEL | 


IEAPVRAL | [EAPVRAL 


STATUSCK 


PROCPFTE 


RET30 


wa 
ca 
| 
Ww 
° 


VRINT 


CALCPFTE 


i rr rn ee a a i ee = 


ee en a i nn 


r 


C 


LS eR Me APN  NT ne e e e E O pe hia ete 
[ROUTINE | 


NOTES | NAME | LABEL 


8 Immediate allocation can be made if all needed rage 
frames were available (PCBRCNT=0). 


~-------------------------------------=--------------------- cea TCE 
| 
| 


9 The root PCB is flaced on the V=R root PCB Queue and the| 
V=R Flush routine is called to try to find rore usakle | 
pages. Upon return, a test is made to determine whether | 
the root PCB is still on the queve. If it is not, the | 
request has been satisfied and the return code is set to| 
zero. If it is still on the queve, the return ccde is 
set to 12 to indicate that the request has been 
deferred. 


If the region address in the parameter list is zero, 
the Scan option has keen selected and the address of 
the area to scan is used as the region address. 


Free V=R 
Pages 


The Free V=R Pages calculates the first PFTE in the 
region (region address/256 + PFTE° address) and handles 
each PFTE in the region beginning with that cne as 
follows: 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
e If the page is marked damaged LEy RMS (PFTBADPG=1), | 
nothing is done to it. | 

| 

e If the page is not yet allccated to the region | 
(PFTVRALC=0), PFIVRINT is set to zero. | 

| 

| 

| 

| 

| 

| 

| 

| 

| 


e If the page is not damaged and is allocated, the PFTE 
Enqueve routine (IEAPRLS2) is called to add the PFTE 
to the available fage queue, PFTONAVQ is set to 1, and 
PFTVRALC is zeroed. 


When all pages in the regicn have been handled, return 
is made to the caller. 


After the number of pages in the region is calculated, |Region 
the Find Page routine (IEAPFP) is called to find the |Valida- 
PGTE for the first (next) page. If the Find Page |tion 
routine cannot find it, a call is made to IEAPSER to log| 

the error (code 0302) and the next PFTE is processed. 


If the Find Page routine succeeds and the call is for 
allocaticn, the PGTE is validated Ly setting PGTFVM to 
0, PGTPAM to 1, and the frotecticn key to 0. The next 
PFTE is accessed and the call to the Find Page routine 
is repeated. When all pages have been validated, the 
entire region is cleared to zeros, and control is 
returned to the caller. 


If the Find Page routine succeeds and the call is for 
region freeing, the PGTE is invalidated Ly setting 
PGTPVM to 1 and PGTPAM to 0. The next PFTE is accessed, | 
and the call to the Find Page routine is repeated. When| 
all pages have been invalidated, control is returned to | 
the caller. 
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Diagram 5.11 
V=R Release Routine 
*IEAPVRS is entered by IEAPALOC, IEAPRLS, (Allocating an Intercepted Page 
IEAPIOP, or IEAPCLR when a page frame is to a V=R Region) 
made available and the V=R intercept bit 
(PFTVRINT) is on to allocate the page to 
a deferred region allocation request 


Processing 


IEAPVRS 


Calculate the page frame address and locate 


1 
the root PCB to which this page belongs. 
2 If the root PCB cannot be found, record the 
error and make the page available. JEAPSER 
g Issue the appropriate 
Input Anup(A) message to the operator. 
5.54 
Register | PFTE Enqueue Output 
Address of PFTE IEAPRLS2 
Add the PFTE to the 
ENE available page queue. PFTE 
Payne! 5.17 PEFTONAVQ=1 
Root PCB PFTVRINT=0 
Address of region Caller PFTVRALC=1 
Size of region orca frame 
f Bi to+ : _—————————— address 
PCBRWRK3 3 If the root PCB is found, allocate the page 
PCBRCNT 
4 Determine whether the region is now complete. Roothee 
5 














PCBRCNT=PCBRCNT -1 


PCBRINT 
if not, or if so but the root PCB has been 
BEERS? marked intercepted Caller 


PCBRTCB 
If the region is now complete, post the 
POST 


initiator and finish the deferred allocation. 


IGC00246 0 Root PCB 


‘ Inform the initiator 
Axxp(s ) that allocation is 4 
3.8 8 
Region Validation 


Validate PGTE; set 
protection keys; clear 
region, 


complete. 


PCBFREE 





Gp 







5.10 32 





Move PCB 


IEAPCBM 
Move the root PCB 


to the free queue. 
5.48 





Caller 
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Diagram 5.11 V=R Release Routine (Module IEAPVEQR) 


(7 ns ee 


, We. See Pon spo otek 
| ROUTINE | 


| NAME | LABEL 

See Se ee a a a a Se a Sa SS aa a a a eee —4-------- 

1 The Root PCB (on the queue headed by PVTVROOT) is IEAPVRS |VAREL10 
located by comparing the page frame address to the 
region and region end address. (Page frame address 
= ((PFTE index) *256)+PFTE address.) If the page 
frame address is greater than or equal to the region 
address and less than the region end address (region 
address + region size), the root PCB has been located. 


z 
8 
e 


IEAPSER is called with a 0301 error code. PVTVSER 


NO 


| 
| 
| 
| 
| 
| 
| 
| 
| 
PFTONAVQ is set to 1 and PFIVRINT is set to 0 to indi- | 
cate that the page is no longer being used and that no _ | 
outstanding requests exist for it. | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
4 
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The count of pages needed to complete the region 
(PCBRCNT) is decremented. 


VRREL10 


4 If PCBRCNT=0, the region is now complete. However, 
if interception is indicated (PCERINT=1), the ECB 
has already been posted (code 16). 


VRRELSO 
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Diagram 5.12 
V=R Region Free Routine 
Entered by FREEPART when ‘ (Freeing a V=R Region) 
the scheduler frees a V=R 
region 2 
Processing 
|IEAPVRFR 
1. Determine whether the region has been 
completely allocated and validated. 
= | 2 If allocation has completed, free this 
region's resources Free V=R Pages 
IEAPVRFR 
Free page frames 
allocated to this 
region, 
5.10 
Output 


Region Validation 


Invalidate PGTEs 


for this region. 


4 5.10 





3 = If.allocation has not completed, free the MWMBBARRRRRRRRRREERERRRRERE ERR ERE ERE 


storage assigned so far and the PCB. 








Free V=R Pages 
IEAPVRFR 


Free page frames 
allocated to this 
region, 





5.10 


Move PCB 


IEAPCBM 
Move the PCM to 


the free queue. 
5.48 


PVTLFXC=PVTLFXC- 
pages freed 





4 Update system fix counts. BABRRABAREBEREE ESE G&aaaaaaaaaanal PVTFXC=PVTFXC- 


pages freed 


Caller 
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eDiagram 5.12 V=R Region Free Routine (Module IEAPVEQR) 


Ge a a a, ae Fete Ne ee Sp ee et ete TY oe igig tf ee oo Ring ernie ae eee soe oe me ee a] 


4  PVIPCVRF is turned on at entry and off at exit. The 
V=R Root Queue (headed by PVTVROOT) is searched for a 
root PCB whose TCB pcinter (PCERTCEBE) matches the TCB 
address in the parameter list. If no match is found, 
the region has previously been completed and validated. 


2 The region address and size (from the parameter list) 
are placed in an an internal PCB and passed to the Free 
V=R Pages routine. 


4 The number of pages freed (region size divided Ly 4096) 
is subtracted from the fix counts. 


T 
| ROUTINE 
| NAME 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


ond 


Input 





PVT 
PVTVROOT 


Root PCBs 
(on V=R Queue) 





*Finish V=R allocation of V=R 
intercepted page, or cancel 
region allocation 


c-— 


Diagram 5.13 

V=R Flush Routine 
(Attempting to Get Needed 
V=R Page Frames) 













Processin 
g Output 
|EAPVRFL PVT 
1 Determine whether this (next) root PCB PVTANYFR=0 
is marked for interception. If so, access 
the next root PCB and repeat. If there 
are no more root PCBs Caller 
2 = Calculate the first PFTE and page count 
for this region. 
2A Determine whether this page frame has 
already been allocated. If so, access 
the next PFTE and repeat the test. If 
no more PFTEs me | Root PCB 
) a aa ae BARA BAAEBEEEEREEEE  PCBRINT=1 
3 Determine whether this page has been ) 
made permanently unavailable. If so POST 
ICG002+6 
Inform initiator of 
allocation failure 
(code 16), 
1 
4 Determine whether the data in this page 
can be moved. If not, access the next 
PFTE, a> 2A 
If none ond 1 
5 Attempt to move data out of this V=R page. 
IEAPMV P2 
Move the data toa 
page above the V=R 
line, 
5.14 
If Move Page is unsuccessful Caller PVT 
PVTANYFR=1 
6 Allocate the page frame to the region. PFTE Dequeue 







IEAPRLS3 

Remove the original 

PFTE from the 

available page queue. 
5.18 


VER Release 


Allocate the 
interrupted page. 
5.1 










1 





PFTE 


PFTONAVQ=1 





Access the next PFTE. pe 2A 


If none => 1 
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Diagram 5.13 V=R Flush Routine (Module IEAPVEQR) 
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Ce ee Se SSS SS SSS T----S- = SECS SSH 4 

| ROUTINE | | 
| NOTES | NAME | LABEL | 
PS ea ee ee a ee 1-==-==> SS>es===4 
| Entered by: | IEAPVRFL| | 
[ | | | 
| e IEAPVRAL when immediate V=R region allocation cannot {| | | 
| be completed. | | | 
| | | | 
| ® Free subroutine when a V=R intercepted page becomes | | | 
| free. IEAPIOP when a fage-in completes for a V=R | | | 
| intercepted page. | | | 
| | | | 
| The root PCBs tested are on the V=R queve pointed to by | | VRFLSH20 | 
| PVTVROCT and chained by the PCBRWRK3 fields. | | | 
| | | | 
| The first PFTE address is calculated by accessing the | | VRFLSH30 | 
| region address (PCBRWRK3), generating a 16 bit PFTE | | | 
| index, and adding to that the apparent page frame takle | | | 
| origin. | | | 
| I | | 
| The page is permanently unavailakle if it is: | | VRFLSH4O | 
| [ | | 
| Allocated to SQA or LSQA (PFTLSQA=1) (unless allo- | | | 
| cated to a TSO task). | | | 
| Long-fixed (PFTLNGFX=1). | | | 
| Marked damaged by RMS (PFTBADPG=1). | | | 
| | | | 
| If any pages are permanently unavailable, the roct PCB | | | 
| is marked for interception. | | | 
| | | | 
| The page cannot ke moved if it is: | | VRFLSH&S5 | 
| | | | 
| e Fixed (PFTFIXcT#0). | | | 
| | | | 
| e Involved in any paging supervisor activity | | | 
| (PF TPCBSI=1 or PFTQNDX=PFTNON). | | | 
| | | | 
| If the Move Page routine fails, there are no more rages | | VRFLSH70| 
| available queue and none could ke freed so allocation | | | 
| allocation cannot complete for this or any cther region. | | | 
| | | | 
| Replacement is prohibited before allocation and allowed | | VRFLSH70 | 
| again afterward (PVTEIGM is set to 1 before and 0 | | | 
| after.). | | | 
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Same as IEAPMVPG but the 
page must not be V=R 
intercepted and con be 


Entered by various paging 
routines to find a nonfixed 
available page above the 


® Diagram 5.14 
Move Page Routine 
















above or below the V=R VER line into which data H 
line can be removed Processing 
JEAPMVPG 
IEAPMVP2 
Input cc 1 Set appropriate switches. ea thespecitied Output 
| 2. Try to find a replacement PFTE for the (Diagram below) 
| input PFTE on the available page queue. 
‘ Register ] 
Regist 
ae | If unsuccessful and the input PFTE's data Positive index of 
PFTE index = must be saved BRRBRRRRRABEERS BEEBE EEEEEREEGGEGQQGQQGa (A) > input PFTE 
Caller 
If successful ==> 4 Z PTE (for the page from 
If unsuccessful but the input PFTE‘'s data alist which data is moved) 
does not have to be saved, continue. PGTPVM=1 
ifi PFTE D aT 
3 Search the active page and hold page search: the <peeiiied PGTRSA=PFTE for "to 
queues for a replacement PFTE. rae |EAPRLS3 properly adjusted 


PFTE of "from" page 


PFTVBN _— 


PFTE of input page 


PFTQNDX = 6 
PFTNQN 


Input 


Register 1 


PFTE queve number _ 
PVT 
PVTVEQR 


From Move 


a 
| | LU-———-+ 7 
PFTEs on queue L. 
ee ee om | 
PFTVRINT SS 
= L+ g 
PFTFQPTR 7 | 
PFTBADPG | | 
PFTPCBS| | 
PFTFXCT L_ 
SSS 





Page (above) Processing 


SCANGQ 













i bel 
(Diagram below) Remove the specified 


PFTEs from their 
queues. 





PPA) 


If one cannot be found 


PGTPAM 
O== 


Page to which data is moved 


Storage key="from's 


Dequeue the PFTEs to be exchanged. 
storage key 


Move data and keys to appropriate page, 


"To" page frame 
if necessary. 


Data that was on 


IEAPFP2 "from" page frame 


Locate the PGTE for 
the "from" page. 


5.27 
MODESET 
Change modes (relocate 


or non-relocate) 3.21 


8 





Input PFTE 


"New’'s" data 


Exchange data in the PFTEs and move them New PFTE 


to the appropriate queves, 
sie? i "Input's" data 


PFTVRINT=0 


PFTE Enqueve 


Append the PFTE to 
the indicated queue, 
5.17 


Register |] 
"New" PFTE index 























Caller 


Output 









Determine whether any more PFTEs must be 
tested. If not 


If so, determine the tests to be made. 


For entry at IEAPMVPG, determine whether 
this PFTE is above the V=R line. 


For entry at IEAPMVP2, determine whether 
the PFTE is marked for interception. 


If the tests fail, get the next PFTE. 


Determine whether this page can be used. 
If so 





Caller 
Register 15 


LRBABABERBERABRRRE > 


Annnaneeneennennn \ 


Registers 1 and 15 
BABBRRRBERREEEEEEEREESS 


7 


=> 7 


I* not, get the next PFTE. 
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Diagram 5.14 Move Page Routine (Module IEAPVEQR) 
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If register 1 contains a positive PFTE index, the data 
and storage keys of the input page frame must Le fpre- 
served in any move. 


If register 1 contains a negative PFTE index, the data 
and keys of the input page frame do not have to 
be saved. 


An internal entry switch is set to 0 for entry at 
IEAPMVPG; to 1 for entry at IEAPMVP2. 


An internal "I" switch is set to 1 if Register 1 
is positive; to 0 if Register 1 is negative. 


If a PFTE is not found on the available page queue and: 


e The "I* switch 1, a "One-way" move cannot Le made. 


e The "I" switch 0, the data and keys in the inrfut 
page frame need not ke saved, but those in the "new" 
page frame (the one into which data will be moved) 
must be saved. An internal "M" switch is set to 
indicate this. 


If a PFTE is found on the available page queue, and the 
"I" switch equals zero, the "M" switch is set to 0. 


SCANQ is called to scan each active page queue and then 
the hold page queve until a usable PFTE is fcund. 


Page replacement is prevented by setting PVTBPIGM befor 
calling the PFTE Dequeue routine. 
tine is then called twice; first for the input PFTE, 
then for the new PFTE. 


a a he a en na So me we Sa a Se ee ee a ea a eee he oe 


e 
The PFTE Dequeue rou- 
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|ROUTINE | 
| NAME 


IEAPMVPG | 
| 
| 
| 
| 
| 
| 
IEAPMVPG| 
IEAPMVP? | 


ISWTEST 


ICONT 


g 
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the "I" switch 
moved into the 


is on, the data from the input page 
new page frame. 


the "M" switch 
moved into the 


is on, the data from the new page 
input page frame. 


If neither switch is on, no data is moved. 


Upon return from the Find Page routine, a PTLB instruc- 


tion is issued tc purge the hardware DLATs after invali- 


dating the PTE for the page from which data was moved. 


MODESET is called before the move to place the 
routine in nonrelocation mode and after the move 
to return it to relocation mode. 


If the input PFTE was not on a queue originally 
(PFTQNDX=PFINON), the first call to the PFTE Enqueue 
routine is skipped. Otherwise, PFTE Enqueue is called 
twice; once to add the new PFTE to the queue of the 
input PFTE and once to add the input PFTE to the new 
PFTE'S queue. 


Replacement is allowed (PVTBIGM=0) before exit is taken. 


A register loaded with PFTQPTR is tested for zero 

to determine whether any PFTEs are left to be tested. 
The entry switch (set in IEAPMVPG or IEAPMVP2) is 
tested to determine the entry roint. 


The entry switch (set in IEAPMVPG or IEAPMVP2) is 
tested to determine the entry point. 


The page is usable if it is: 
e Not marked as damaged Ly RMS (PFTBADPG=0). 
e Not assigned a PCB (PFTPCBSI=0). 


® Not fixed (PFTFXCT=0). 
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e Diagram 5.15 (Steps 1-3) 
Page Replacement Routine 


Entered whenever an uncorrected 
shortage of page frames is 


discovered. 
Processing Output 


IEAPRPLS 





-——— = Prevent replacement from being initiated 
until the current replacement has been PVT 


~~  T completed. BARBARA RRRRRREREEGER ERR RRRRRRM PVIRPLSW=X'FF' oF 0 


oe ie Search the 0,0 or 0,1 PFT-in-use queve 
(using the page replacement algorithim) 


for PFTEs that represent page frames that 
can be replaced. FJ 


If a page frame is selected for 
replacement PAGEOUT 


Make the selected 
page frame available. 


5.16 


If more page frames are needed, continue 


the search with the next PFTE a 2 
IF no more page frames are needed Sa 4 


If the page frame is not selected, move Moved PFTE 
the PFTE to the appropriate queue and 


reset the reference bit. SSS Sse Fee rey 
queve number 


DEQ PETE PFTFQPTR 


Remove the PFTE from 
its present queue, 


L 


ey ee eee 


ENQPFTE 


Add the PFTE to the 
appropriate queue. 


If the end of the queue is reached, 
continue. 


a a NAO ee Pe eee 


| 
| 
| 


If the completed queue is the 0,0 queue, 


continue the search with 0,1 queve. > 2 Paging Supervisor 
If the completed queue is the 0,1 queue and Error Recorder 
the queues have been searched twice and 20 IEAPSER 

seconds have elapsed since the last call. Log the error. 


9.54 
Otherwise > 5 


(Continued at Step 4) 
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eDiagram 5.15 (Steps 1-3) Page Replacement Routine (Module IEAPRPLS) 
Seg eT a ee ae ee ST a a ae 5 aaa ane ho ya 1 


l 
| NOTES 


re ee ee ee ee 


This replacement attempt is not finished until all I/0 
it initiates is completed. 


An internal counter of pages needed is set to PVTREPCT 
and a counter of Scan iterations (PVT00) is set to zero. 
The 0,0 PFTE queue is set as the first queue to be 
scanned. 


The queve is located by taking the physical PFTE queue 
number from PVTQOO or PVTQ0O1 and using that number as 

an index into the PFTE queue headers in the PVT. See 

the page replacement algorithm (on the following page) 
for an explanation of the scan logic. 


Upon return from PAGEOUT, the counter of pages needed 
is decremented by one. If it now equals zero, no more 
pages are needed. 


The internal counter of scan iterations is tested. If 

it is equal to 3, two iterations have been made through 
the PFTE queves. This is an error condition indicating 
either that replacement was invoked needlessly or that 
fixed, SQA, LSQA, V=R, or any combination of these types 
of pages have overcommitted real storage and left an 
insufficient number of pages for paging. The error code 
passed to IEAPSER is 0600. 


See takle following the notes for this diagram for an 
explanation of the page replacenent algorithr. 


em ee ee ee ee ee ee ee 


| ROUTINE | 
| NAME [LABEL | 


IEAPRPLS | GORPLACE 
| 


RPLACE15 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| ENOFQ10 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


(ag cs a ce ce cg ee oo he 


Ce re ee ee ee ee ee ES re ee EC Eee ee 1 
| PAGE REPLACEMENT ALGORITHM TABLE | 
--—------- TS 2-== T= Ss2S5--=> T---- += 2S SST SS Sa SSS = 9 SF 9 = —- 
| Queue | | | | 
| being | Fix | Reference | Change Bit | | 
| Scanned | count | Bit setting | setting | Action | 
}---------+------- ------------- $------------ }--------------------------------- 
| 0,0 | non-O | | | Page nct eligitle for replace-_ | 
| | | | | ment; continue search with next | 
| | | | | PFTE. | 
| | | | { | 
| 0,0 | 0 | 0 | 0 | Replace the page frame asso- | 
| | | | | ciated with this PFTE. | 
| | | | | | 
| 0,0 | 0 | 0 | 1 | *Move this PFTE to the 0,1 queue| 
| | | | | and ccntinue search with the | 
| | | | | next PFTE. | 
| | | | | | 
| 0,0 | 0 | 1 | 0 | *Move this PFTE to the 1,0 queue| 
| | | | | and ccntinue search with the | 
| | | | | next FFTE. | 
| | | | | | 
| 0,0 | 0 | 1 | 1 | *Move this PFTE to the 1,1 queue| 
| | | | | and ccntinue search with the | 
| | | | | next PFTE. | 
| | | | | | 
| 0,1 | non-O | | | Page not eligible for replace-_ | 
| | | | | ment; continue search with next | 
| | | | | PFTE. | 
| [ | | | | 
| 0,1 | 0 | 0 | 1 | Replace the page frame assc- | 
| | | | | ciated with this PFTE. | 
| | | | | | 
| 0,1 | 0 | 1 | 1 | *Mcve this PFTE to the 1,1 queue| 
| | | | | and continue search with the | 
| | | | | next PFTE. | 
besoe oe oS peace acs open cane ete nen ene open Spee ee aR UN a es eR ee 4 


|* The Reference Bit is set to zero each time the PFTE representing the rage | 
| frame is moved. 
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Input 


PVTANYFR 
PVTAPC 
PVTLTH 





Diagram 5.15 (Steps 4-5) 


Page Replacement Routine 


Processing Output 


r— —1-4 IF page-outs were initiated Caller 
| 
=i 


If no page-outs were initiated and no pages 
are available, indicate that the Page 1/O Post 
routine must allow reserve-replenish processing. BRBRRRRBARE BE GE 
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TARR RRRRRRERRRRRR PVT RRTPH=1 








If no page-outs were initiated, some pages are 
available, and pages are needed for V=R 
allocation. 


VER Flush 


[EAPVRFL 
Allocate pages to 
If the available page count is now Jess than the a VER region. 


low threshold, reinitiate replacement. 


5.13 


2 
PVT 
Allow reinitiation of replacement when LBABRASEERSEVWUe™SVSVeanaediaeaaaaaaaaa»aa\a SUMB] PvTRPLSW-0 | 


necessary 


Last 1,0 PFTE 


PFTFQPTR 


Caller 


Swap the 1,0 queve with the 0,0 queue and the 
1,1 queve with the 0,1 queue. Append the PFTEs being moved 


hold page queue to the 1,0 queue. Begin the PFTQNDX=PVTQ10 
search again with the 0,0 queve. > 2 
PFTHOLDQ=0 
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Diagram 5.15 (Steps 4-5) Fage Replacement Routine (Module IEAPRPLS) 


da a a ep pe a ee a ate ey gig eee a ee ee ee a a ea | 
| ROUTINE | | 

NOTES | NAME | LABEL | 
wa $ $8 $$ 8-2-8 $$ nn nnn no nnn a --------}--------4 
4 | IEAPRPLS|ENDPROC | 
{ | | 

5 The scan iteration counter is incremented before the | | ENDOFQ20 | 
swap. 
The queues are swapped by exchanging the physical queue | | | 
numbers in PVTQOO with PVTQ10 and PVTQ0O1 with PVTQ11. | | | 
The hold page queue is appended Ly setting the forward | | | 
pointer of the last PFTE on the 1,0 queue to the first | | | 
PFTE on the hold page queue, turning off PFTHOLCQ in the| | | 
appended PFTEs, and setting their PFTQNDX fields to | | | 
the value in PVTQ10. | | | 
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change bits 
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PCB 
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PVTLTH 
PVTRPLSW 
PVTANYFR 





From IEAPRLS to 
schedule reallocation 
of a selected page 


From Page I/O Post routine 
when page-outs for the 
replacement root PCB have 
completed 


Processing 


PAGEOUT Subroutine 


1 Remove the PFTE from its queue, 


2 Locate and invalidate the PGTE. 
Arenayy(A) 


3 Determine whether the page has been 
changed. 


If not, and it is marked for V=R 
interception 


If not, and it is not intercepted 
’ 
ARAAAB) (B) 


4 Initiate a page-out for a changed page. 
Perform SMF accounting 


Get a root PCB, if one does not exist, 
and a regular PCB for the page-out. 


Initialize the PCBs and schedule it 
for page-out. 


baneey(c) 


Root Exit Routine 


5 Free the root PCB, 


Anwnnyy(D) 


6 Determine whether the low available page 
count threshold has been violated. If so, 
attempt replacement. 


7 ~ Determine whether V=R needs pages. If so 


If not 
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Make the page 
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Find the PGTE and 


XPTE for this VBN. 
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IEAPVRS 
Allocate the page 
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e Diagram 5.16 Page Replacerent -- Allocation Scheduling and Root Exit Processing 
(Module IEAPRPIS) 

(SSS ee ee {oO -=S 7S - => Saar 1 
[ROUTINE | { 
NOTES | NAME | LABEL | 
}------------------------------------------------------------4-------- +-------- 
|PAGEOUT | PAGEOUT | 
| | | 
2 The PGTE is invalidated since the page frame is being | | | 
made unavailable. If the return ccde from FINDPAGE is | | | 
net zerc, PAGEOUT passes control to IEAPSER, with code _ | | | 
601, to issue a message indicating that the error is | [ | 
recoverable. Then processing continues at step 3, | | | 
treating the page as not changed. | | | 
[ | | 
3 If the page is unchanged, an exact copy of it exists on | |POUT30 | 
external page storage (that is, a page-out is not | | | 
needed). If the page is given toc V=R Release, it is | | | 
not counted toward the replacement count. | | | 
| | | 
4 SMF accounting routines record the page-out operation | |POUTOO | 
in the effected task's statistics table (TCT) if one | { | 
exists. If PFTWHOSE=0 or TCBTCT=0, there is no TCT. | | | 
| | | 
5 Since all operations represented by this root PCB have’ {|Rcot | ROOTEXIT | 
been completed, the root PCB is no longer needed. | Exit | | 
{Routine | | 
6 | | | 
| | RTEXITO1 | 

| | 
7 | RTEXITO2 | 
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Diagram 5.17 PFTE Enqueue Routine (Module IEAPRPLS) 
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Diagram 5.18 PFTE Dequeue Routine (Module IEAPRPLS) 
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| The input PFTE index is converted to the PFTE address. | IEAPRLS3| IEAPRLS3 | 
| The target queue is located Ly using PFTQNDX as an | | 
| index into the PFT queue headers in the PVT. | | | 
I [ | { 
| The available page count (PVTAPC) is decremented Ly 1 | | | 
| and compared to the low threshold (PVTLTH). The Page | | | 
| Replacement routine is called immediately if: | | | 
| | | | 
| e PVTLTH>PVTAPC and | | | 
| | | | 
| e PVTRLPSW=0 (replacement is not in progress) and | | | 
| | | | 
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| | | | 
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| available page count is tested again. If PVTAPC=0, | | | 
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| Release Queue Suppression routine (IEAPCRQS) is skipred. | | | 
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eDiagram 5.19 Task Disaklement Algorithm and Threshold Checking (Module IEAPRPLS) 
(OSS SSeS oe ee oe ee oe See ee ee eee ee eer a exter 5 Onecare eae! 1 
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If the interval reclaim count, the interval read count, 
or the interval swap-in count is negative, that system 
count was reset during the last interval. 


A 0 is passed to the dispatcher in register 1 to 
indicate shutdown. 


If the return code from the dispatcher is 4, no shut- 
down was possible. If the return code is 0, a task was 
shut down and either its TCB address or a zero is in 
register 0. If a TCE address exists, the TCE is 
accessed and SCANPFTQ is called. If the TCE address is 
0, some subsystem (for example TSO) took some acticn. 


SCANPFTQ is called successively tc scan the active rage 
queues (PFTACION, PFIAC2QON, PFTAC3QN, PFTAC4CN) and the 
hold page queue (PFTHOQN). 


A 4 is passed to the dispatcher in register 1 tc 
indicate startup. 


If the dispatcher is successful, PVTSHUT is decrement- 
ed. If it is unsuccessful, PVISHUT is set tc zero. 


If PVTFLAG3¥0, a threshold has been violated. 


See the table following these notes for a desScriftion 
of the fields in the PVT used in the Task Disable 
Algorithm. 


SCANPFTQ compares the input TCE address with the 
PFTWHOSE field of each PFT on the queue. For each 
match found, the reference bits in the page represented 
by that PFTE are turned off Ey means of an RRB instruct- 
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iagram 5.20 Page Service Interface Routine (Module IEAPSI) 


1 For entry at IEAPSIBR and IEAPSIOR, the contents of 
registers 0 and 4 are exchanged. 
Entry switches are set at all entry points. 
2 If the Release routine is called, its return code is 
passed to the caller. 
1 Registers at entry to IGC113 are: 
Register 0 - ECB address (0 for FREE requests) 
Register 1 - List entry (VSL) or pointer to parameter 
list 
Register 2 - Second half of VSL or (for list form) 
irrelevant 
Register 4 - Requester's TCB address 
Registers at entry to IEAPSIBR and IEAPSIOR are: 
Register 0 -— Requester's TCB address 
Register 1 - VSL address (list form) or first word of 
VSL 
Register 2 - Irrelevant (list form) or seccnd half of 
VSL 


2 | LISTINIT initializes internal fields associated with 
the parameter list and makes register requests appear 
like list requests for compatakility. 
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Diagram 5.21 (Steps 1-2) FIX/LOAD Subroutine (Module IEAPSI) 
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[ROUTINE | 


NOTES | NAME | LABEL 


+ -+ 
| FIX/LOAD| FIXLOAD 


mh 


l { 
For entry at FIXX, an environment for FIX/LOAD that is |FIXxX | FIXX 
compatible with other entries must be established. An 
internal “ROOTPTR® is set to the root PCB address, 
register 1 is set to its contents at original entry 
(from PCBWK2), register 4 is set to the original TCB 
address (from PCBRICE), and, for an SVC entry, register 
0 is set to foint to the ECB (from PCBRWK1). 
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address associated with it. If one is found, the 
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Diagram 5.21 (Steps 3-5) 
FIX/LOAD Subroutine 
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eDiagram 5.21 (Steps 3-5) FIX/LOAD Subroutine (Module IEAPST) 
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An internal "fix/load counter” is incremented after 
each return from NEXTVMA. If the counter exceeds 
255, too many fageS are in this request. 


If the virtual address is less than PVTVEOR, the 
page is below the V=R line. 


The virtual address is used as the argument of an 


LRA instruction. If the page is not in real storage 


and the virtual address is invalid, an error flag 
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If the LRA shows the virtual address to Ee valid but 


PGTPVM=1, the address returned by the LRA instruc- 
tion (the real address of the PTE associated with 
the virtual address) is passed to IEAPTRV. If 
PGTPAM=0 in the PTE whose address is returned, the 
page has not been allocated by GETMAIN. VSLERR 
and the internal “kad address” Switch are set. 


If all criteria are met, an internal “second-scan" 
switch is set to indicate that at least cne fage-in 
must be initiated to satisfy the request. 


Long-fix processing is done during the second scan. 
The PFTE address is calculated as follows: 


Bits 8-19 of the real address from LRA x 16 
+PVTPFTP 


If PFTLSQA=1 in the indicated PFTE, no fixing need 
be done. 


For a long-fix request, PFTINGFX is set to 1, and the 
internal "long-fix" counter (LPCOUNT) is updated if the 
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Diagram 5.21 (Steps 6-10) FIX/LOAC Subroutine (Module IEAPSI) 
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oie aaa eee Sa ee a aie ee oe $--——---- {—--~--_—_ 

6 Internal pointers are reinitialized and an internal | FIX/LOAD | NONINCOR | 


pointer to a gotten PCE (PCBPTR) is set to zero kLefore 
the first call to NEXTVMA. 


7 If the return code from FOEON is 4, PFTFXCT is incre- 
mented before the next call to NEXTVMA. If the return 
code # 4, FOE accounting completed the transaction. 


8 If PCBPTR*0, a PCB is “left over" from a previous iter- 
ation. The call to BUILDPCB is skipped and the fointed- 
to PCB is used. 
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If the return code from the Real Storage Allocation rou- 
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page was not assigned and: 
This is a LOAD request 


This is a FIX request and: 





page, create a dummy PFTE, Ey 1a 
A PCB exists for this virtual address 
not on the real storage allocation 
queue 


> | 4 


A PCB for this virtual address Qe er ee oe AN ANN 


created as part of this request exists VW 
FOE Merge 


on the real storage allocation queue 
FOEON 


Perform FOE 
accounting. 


5.26 


bE 6 


A PCB for this virtual address that is 
not part of this request exists on the 
real storage allocation queue, 
ensure long-fix if necessary, and 
relate the current PCB to the found g 
one. 









PCBs. 


(Continued at Step 13) 


q 


aatenwees NAA Branch Root PCB 


Move PCB 


IEAPCBM 
Add the PCB to the 


indicated queue. 





No other PCB exists for this virtuc] AWWA RRBABRBERRRREREEEREEERY 


we 


FPABIABABRUARERREEEEEEEREEEEEERREEEEE 


Relate PCB 


IEAPCBR 
Associate indicated 





Diagram 5.21 (Steps 11-12) 
FIX/LOAD Subroutine 


Output 











SVC Root PCB 


PCBRWK l=address of ECB 
PCBRWK2=address of 
parameter list 

PCBRRAO 


PCBRG OTOF-address of 
FIXLOAD2 


PCBRCNT=O 


PCBRTC B=address of 
input TCB 





Vs wal 


\\ 









BRBaBaeaaaa' 


PCBRWK 1=0 

PCBRW K2=address of 
parameter list 
PCBRRAO 


PCBRGOTO =address of 
FIXLOAD2 


PCBRCNT=0 


PCBRRB=address of 
input TCB 


Input registers 


0-6 
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; Input registers 
[7-14 | 
y PCB (current) 
, 
root PCB 
g PCBTCF=0 
y Root PCB 
; 
y) 
y PCB (current) 


b 

’ 
’ 
’ 
; 


eapranc 


PCB (found) 


SAH PCBLFR=1 
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Diagram 5.21 (Steps 11-12) FIX/LOAD Sukroutine (Module IEAPSI) 
eS SS er Se a ae rT Sa 2-55 S4= —====-> == 1 
| | RCUTINE | | 
| NOTES | NAME | LABEL | 
11 This processing is done if the return code from the Real|FIX/LOAD|CALLFIXA| 
Storage Allocation routine was 4 or 12. | 
| 
The PFTE address is calculated ky adding PCBRBN to 
PVTPFTP and is. passed to FIXACCT. 
An internal ROOTPTR is tested and, if zero, GETROOT is GETROOT 
called. If ROOTPTR#0, the root PCB it points to is 
used. 


E} GETROOT obtains storage for a rcot PCB (via Puild PCR) 
and initializes it. The type of root PCB obtained 
depends on the entry tyrfe. 


The return code from Real Storage Allocation is tested 
for 12 (PCB related). If it is 12, either Rea] Storage 
Allocation set it or it was set by this routine after 
the call to the RELATE PCB routine, and the call to the 
Move PCB routine is bypassed. 


The internal PCBPTR is zeroed to indicate that the PCB 
just used cannct be re-used kefore the next call to 
NEXTVMA. 


| 
| 
| 
| | 
| 
| | 
| 
| | 
| 
| | 
| 
| | 
| 
| | 
| 
| | 
| 
| | 
| 
| 
| 
| 
| 
112 This processing is done if the return code from the Real | 
| Storage Allccaticn rcutine was 8. | 
| 
| 
| 
| 
| 
| 
[ 
| 
| 
| 
| 
| 
| 
| 
| 
| 
l 
| 
[ 
| 
| 
| 
l 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
If XPTPCBQ=0, no other PCB exists for the virtual | 
address specified in this request. The fix count in the | 
current PCek (PCBFXC) is set to one and FIXACCT is called | 
with a pointer to a dummy PFTE whose PFTIFXCT field=0, | 
and whose PFTVBN is set to the appropriate virtual | 
address. | 
| 
| 
| 
| 
| 
[ 
| 
| 
| 


ce ce oe oe ee oe = 


If XPTPCBO#0, the Real Storage Allocation qué€ue is scan-| 
ned for a PCB whose PCRVBN field matches PCBVBN in the _ | 
current PCB. If a match is not found, the error exit is| 
taken. 


If PCBRTP=ROOTPTR in the found PCH, this PCB is part of 
this request and FOE accounting is performed. If the 
return code from FOEON is 4, PCBFXC is incremented. 


If there was no root PCB for this request (RCOTPTR=0), 
or the root PCB pointers did nct match, the current PCB 
is related to the found PCB via the Relate FCB routine. 
If the request is for a long-fix and the found PCB is 
for a fix but not a long-fix (PCBFXC#0 and PCBLFR=0), 
PCBLFR is turned on and LPCOUNT is incremented before 


| 
| 
| 
| 
| 
| 
| 
the call to the Relate PCB routine. | 


-to--- --_-_ - Cr Oo OO en sn en se no ee ee a an i a Ee Ee ee 


ee a 
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Diagram 5.21 (Steps 13-17) 
FIX/LOAD Subroutine 


Input Processing Output 


Found PCB 
13 


a 


14 
15 
Root PCB 
-—-- 
16 
——-+ 17 





If the found PCB is for a FIX 


s FOEON 
anp(A) 
Perform FOE accounting. 
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118 

If the found PCB is not for a FIX, ensure 

that FIX processing will be done; build PCB 

a dummy PFTE. LARABABBRARARRRRARRES SSS SOS ~ 
11a 


Second Scan Error 
Free a "left-over" PCB if necessary. 
A 
gg. : IEAPCBM 
As >(B) Add the PCB to the 


free queve. 5.48 





PCB (Root) 


Set up for backing out the request. 5 By) PCBNQN=PCBFREE 


Arndt ter teBUBBBUBBanan WEBER RERRRERER' SEY Register 15 
Second Sean End 
Free a "left-over" PCB if necessary. [Eien 


s IEAPCBM 
oO 


Add the PCB to the 
Free a completed root PCB if necessary. 


Z 
Axy(c) 


Finish Non-Error Processing 





free queve. 5 48 


ROOTFREE 


Route the root PCB 
to the free queve. 






Register 15 


(c) » Appropriate return code 


PVT 
PVTFXC=PVTF XC+ 
PCOUNT 









Determine type of request: QRRRRRRRRREEEEEEEEE EERE EaRaaaaaaaanaan 
PVTLFXC=PVTLFXC+ 
aoe 19 LPCOUNT 
FIX request from FREE 20 


If any FIX limits were exceeded FREEX 


Back out FIX request. 
5.22 





21 
MBABBABWASa ve ea VpVaaaaaagaaaaaaaaaaaaaaaann 


Register 15 


D> [Return cadena 


VAN Y 


(Continued at Step 18) 
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Diagram 5.21 (Steps 13-17) FIX/LOAD Subroutine (Mcdule IEAPSI) 
CoS SS a SS oe ee ee ee ae T 


| 
| NOTES | 
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| 
| 
| 
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| 
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| 
| 
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| 
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| 
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| 
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| 
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| 
! 
| 
| 
| 
I 
| 
| 
| 
| 
! 
| 
' 
! 
| 
I 
! 
| 
! 
1 
! 
| 
1 
! 
| 
' 
\ 
! 
| 
! 
I 
| 


13 If the return code from FOEON is 4, PCBFXC is incremen- | 
ted by 1. 


If the fix count (PCBFXC) in the found PCB (the cne to 
which the current request was related) is zero (PCB not 
for fix), it is set to 1 and a dummy PFTE (see Ncte 12) 
is set up Lefore the call to FIXACCT. 


14 If the internal PCEPTR#0, the PCB it points to is routed 
to the free queue (PCBNQN=PCEFREE). 


An internal “synthetic end" switch and pointers to the 
current and last VSLS frocessed are set up so that only 
the portion of the request that was processed thus far 
will be backed out by FREEX. 


15 A possible leftover PCB is handled as in Note 14. 


If the internal ROOTPTR=0, none of the requested pages 
require further paging action. If ROOTPTR#0, the indi- 
cated roct PCB does not represent any pending requests 
(PCBRCNT=0), and the caller of FIX/LOAD was not FREE, 
the root PCB is dispesed of. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
16 The return code is set to 8 if a root PCB remains, or | 
to 0 if the operation is complete. | 

| 

PCOUNT (newly fixed pages) and LPCCUNT (newly long-fixed| 
pages) are added to PVIFXC and PVTLFXC respectively to | 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

4 


keep count of fixed pages in the system EFefore the 
request type is determined. 


17 For a long-fix request, if LPCOUNT>PVTLFXL, the long-f1ix 
limit has been exceeded. 


If PCOUNT>PVTSFXL (SVC request) or PVTBFXL (Branch 
request), the fix limit has Leen exceeded. 


4. ROOTFREE returns the rcot PCB to the free queve (via 
MOVEPCB) as follows: 


e For an SVC root - Zero the root and set PCBNOQN= 
PCBFREE. 

e For a Branch root - Zero the root, chain the three 
blocks together ky PCBFQP and PCBBOR, and set PCBNOQN 
of the first block equal to PCBFREE. 


C 


{ROUTINE | 


NAME 


FIX/LOAD 


ROOTFREE 


an mc ee ee ee — _. 


| LABEL 


FRROREX1 


LISTEND 


FINISH 


fe mn a a a a rs a a a a a 


89C 


PVTTBASE 
PVTSQACT 
PVTLFXTF 





Processing 


18 Determine whether any thresholds were 
exceeded: 


If not, and the real address option 
was chosen 


PASSBACK 


Find the real address 
of the assigned pages. 












If not, and the real address option 
was not chosen, or if threshold 
checking was bypassed 


19 
Z 


If so, and the SUSPEND option was 


LA 
¢ Delay the FIX request. 
Ao® 





6) 


Back out the request. 
5.22 
Li 19 


If so, and the SUSPEND option was 
FREEX 


not chosen, reject the request 
Wa 
Y Back out the request. 
Annu) 
La on 


(Continued at Step 19) 












Diagram 5.21 (Step 18) 
FIX/LOAD Subroutine 


Output 


Register 15 


AQURARABABABARARRBRS WAVD(A swan ED] Appropriate return code | 


= 


Root PCB 


PCBRWK3=PCOUNT 


PCBRINT=1 
PCBRQED=1 


PCBRW K4=forward 
pointer 










S butbeq :G uoTRzDaS 


uotstarzodn 


692 


Diagram 5.21 (Step 18) FIX/LOAD Subroutine (Module IEAPSI) 


C 


a Be ee eg SP eee ; RSS aie oe | 

JROUTINE | | 
| NOTES | NAME [LABEL _ | 
}---------—--~---~-----------~-~-+-----+----+~----------- ------ f--------4------ a 
18 For a long-fix request: | FIX/LOAD|CHECKLIM| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


! 
I 
Hy 
! 


If PVTFXMCM=1, threshold checking should ke bypassed 
because this is a DSS activate request. 


If PVTLFXC>PVTTBASE- (PVTSQACT+PVTLFXTF), the threshold 


has been exceeded. 


For an SVC request, if PVTFXC>PVTTBASE- (PVTSCACT+ 
PVTSFXTF), the threshold has been exceeded. 


For a Branch request, PVTBFXTF is used instead of 
PVTSFXTF in the akove equation. 


PASSBACK is called only if the request has thus far 
completed normally (return code =0). 


PASSBACK satisfies the real address option Ly using the 
virtual address of the indicated page (bytes 1-3 of a 
normat VSL) as the argument of an LRA instruction and 
placing the resulting real address in bytes 5-7 of the 
VSL. 


SUSPEND queues a FIX request that cannot be honored 
because of a threshold violation as follows: 


e Obtain a root PCE (via GETROOT) if one does not 
already exist and mark it (or the previously exis-— 
ting root) for interception and as queued (PCBRINT=1 
and PCBRQED=1 respectively). 


e For an SVC entry, add it to the SVC FIX delay queue 
(PVTSFXDO) in the proper place. 


e For a branch entry, add the Root to the Branch 
Entry FIX delay queue (PVTBFXDQ) in the frorer 
place. 


e Root PCBs are queued by number of pages needed, 
from lowest to highest. 
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| 
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| 
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| 
| 
| 
| 
| 
| PASSBACK 
| 
I 
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| | 

| | 

| | 
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Input Processing 


19 For a branch or pseudo~branch entry 






Internal only: 
Switches, pointers and 


return code indicator SS For an SVC entry, inform the SVC issuer 


of action taken if necessary 


CALLPOST 


Initiate posting of the 


requester, 


FIXX Exit 


20 If the FIX operation is unfinished for a 
branch entry, defer a second exit. 


SCHEDRT 


| Et punntanennnnnn 


For an SVC entry, inform the SVC issuer 
of action taken. 


CALLPOST 


Initiate posting of the 


requester, 












Finish Latent Error 


ROOTFREE 


Route the root PCB 
to the free queve. 


21 = Clean up a root PCB if necessary 


lf the root PCB cannot be freed ap(A) 


If entry at FIXX (from FREE) 


Otherwise > 19 


FIX/LOAD Exit RUBIBBBARBRRBARRRRRRARRRRRL, 


Caller p 










¢ Diagram 5.21 (Steps 19-21) 
FIX/LOAD Subroutine 


Output 












CVT 


CVTPSIC=0 





\ VN 


~~ 


VT 
PVTPCPSI=0 


Register 15 


Return code 
Type-1 Exit 


Routine 


(IEAOXEQ0) 


Caller 
PCB 


PCBNQ N=PCBDPSTQ 
PCBRT P=address of 
root PCB 


FPcBiol=1 | 





Caller 


Root PCB 


@eswpfenc | 


Caller 
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Diagram 5.21 (Steps 19-21) FIX/LOACD Subroutine (Module IFAPSI) 


C 


Ce sr Sa ee a a ee ee T= 75S == =< -ss-=== 4 
| ROUTINE | 

| NOTES | NAME | LABEL [ 
Pa ee ae 

119 CALLPOST is called only when return codes 0, 4, 36, or |FIX/LOAD|FLEXIT | 
| 44 (when the SUSPEND option is not specified) are | | | 
| indicated. | | | 
| | | | 
120 If the indicated return code is 8, exit is made immed- | | FIXXEXIT | 
| iately to the caller (FREE). | | | 
| | | | 
| For a Branch entry, if the indicated return code is 4, | | | 
| it is changed to 28. The return code is placed in | | | 
| PCBRWK4 before SCHEDRT is called. { | | 
| | | | 
| For an SVC entry, if the indicated return code is 28, it| | | 
| is changed to 4 before CALLPOST is called. | | | 
| | | | 
|21 If there is a Root PCB and it has no more associated | | TESTROOT | 
| requests, (PCBRCNT=0), it is freed. Otherwise, it is | | | 
| marked for interception (PCBRINT=1). | | | 
| | l | 
\ fd For explanation of the return codes and completion codes | | | 
| for POST, see table following notes for this diagram. | | | 
| | | | 
Ais CALLPOST sets up parameters for and passes control to | CALLPOST | | 
| POST at entry point IEAOPTO1. | | | 
| | | | 
if} SCHEDRT is called to schedule a root PCB on the delayed |SCHEDRT | | 
| Posting queue when a second exit is needed Lut must re _ | | | 
| deferred. It obtains a PCB (via Build PCB), initializes | | | 
| it, and adds it to the delayed fosting queue (via move _ | | | 
| PCB). | | | 
ee mem PO SP a ta ve EE Oe SY EE ee ee ae ee eer Wi Se Posse Sa2k J 


ELS 


FIX/LOAD RETURN and COMFLETION COLES 
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| 
| 
! 
! 
| 
| 
I 
! 
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! 
| 
I 
| 
I 
| 
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36 


With SUSPEND option specified: 


40 


Without SUSPEND option specified: 


4y 


ee ee ee ee ee ee ee a i i i a ee ee ee ee ee ee 


Meaning 
Operation complete 


Error detected, no 
pages fixed 


Operation proceeding 


Request too large 


FIX request queued 
due to shortage 
of long-term 
fixable real 


storage (long wait) 


FIX request queued 
due to shortage 
of fixable real 
storage (short- 
term wait) 


FIX request re- 
jected due to 
shortage of 
fixakle real 
storage 


Meaning 
Operation complete 


Error detected, 
no pages fixed 

FIX request too 
large, no pages 
fixed 

FIX requested re- 
jected due to 
Shortage of 
fixable storage 

Operation purged 


Meaning 

Operation complete 
Error detected 
Operation proceeding 


Meaning 
Operation complete 


Frror Detected 


FIX SVC Entry 


Action to ke Taken 
None; wait on ECB if desired. 
Error handling; wait on ECB if desired. 


Issue WAIT macro instruction cn same ECB as 
used in the PGFIX macro. 
Error handling; wait on ECB if desired. 


If no interlock exposure exists and if long 
wait acceptakle, issue WAIT macro instruc- 
tion. Otherwise, cancel FIX with PGFREE 
macro instruction specifying ECB option. 


issue WAIT 
cancel the 


If no interlock exposure exists, 
Macro instruction. Ctherwise, 
FIX as akove. 


Reissue request at a later time. Wait on 
ECB if desired. If no interlock exposure 
exists, reissue PGFIX macro instruction 


with SUSPEND specified. 


Acticn to be Taken 
None 
Error handling 


Error handling 


Reissue request at a later time. If no 
interlock exposure exists, reissue PGFIX 
wacro with SUSPEND specified. 


Reinitialize the ECB and reissue the PGFIxX 
Macro instruction. This code occurs when 
an asynchroncus system event has caused 
the issuing task to be quiesced. 


Action to ke Taken 

None 

Error handling 

Issue WAIT macro instruction for the FCB 
that was used for the PGLOAD macro. 


Action to be Taken 
None 
Error handling 


fhe ces Sc es SS es SS ms ms rab ms es Se ce sm cc cs ee ee ks 





ee ee ee a ee 4 
| FIX Branch Entry 

beSaseS SSeS See Soe ee ae ee eee eS Se Sa See eee eee a eee 
| 

| Return 

| _Code Meaning Action to ke Taken 

| Operation complete None 

| 4 Request not performed None 

| invalid address 

| 8 Operation initiated Exit, but leave routine reenterakle. 

| but not yet com- 

| plete 

| 28 Request not performed Error handling. This return code is given 

| invalid address on second entry to the requester ("second 
| exit") from the FIXLOAD 2. 

| 32 Operation complete None. This return code is given on second 

| entry to the requester ("second exit") 

| from FIXLOAD 2. 

| 36 Request too large Error handling 

| 40 Request queued due If no interlock exposure exists and if long 
| to shortage of wait acceptable, exit kut leave routine 

| long-term fix- reenterable. Otherwise, cancel FIX. 

| able real storage 

| (long wait) 

| 44 Request queued due If no interlock exrosure exists, exit but 

| to shortage cf leave routine reenterable. Otherwise, 

| fixable real cancel FIX. 

| storage (short- 

| term wait) 

|-----------------------—_------------------------ -_--------------------------+~ 
| LOAD Branch Entry 

| ----~--------~--—-—--------------------- = === +--+ + -- --- -- -- --- -- - --- = - = - = 
| 

| Return 

| _Code Meaning Action to be Taken 

| Oferation complete None 

| 4 Request not per- Error handling 

| formed, invalid 

| address 

| 8 Operation initiated Exit, but leave routine reenterable 

| but not yet cor- 

| plete 

| 28 Request not rfer- Error handling. This return code is given 

| formed, invalid on second entry to the requester ("second 
| address exit") from FIXLOAD 2. 

| 32 Operation complete None. This return code is given on second 

| entry to the requester ("second exit™) 

| from FIXLOAD 2. 
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From the Page Service 
Interface routine to 







Input handle FREE requests Processing 
FREE 
Initial Phase 
Register | (Se ee 1 oe whether the PURGE option was 
oes . ROOTFREE 
| If so, and a root PCB for this request is 
Root PCB l found, remove it from its delayed posting Route the root PCB 
TPCBRWKI queve and, if necessary, free it. to the free queve. 
PCBRWKI1 
| 12 5.21 


POBRWIGZ From FIX/LOAD 


Seas S mark it for interception, — 
PCB If not, or there is no request to purge 





2 Set appropriate switches and pointers. 
Main Phase 


3 Locate the first (next) virtual address of a 
page to be freed. 


| = sNEXTVMA | EXTVMA 


Find next sequential 
virtual address in 
parameter list. 







PVT If all pages have been handled 
PVT VEQR 
PVTFRCF == 


cara (ease 4 Determine whether the page should be 


freed: 3 
If it is below the V=R line, or allocated 7 
to SQA or LSQA, or in real storage but 
not fixed, or not in real storage with 
the "only in real storage" switch set 


If the page is not in real storage 





al. 

| 

PFTLSQA aoe 
PFTFXCT 






7 
| 
| 
PFTLNGFX —--- 
PFTDFCLR L 
PFTQNDX 


Free a Page in Real Storage 


Perform FOE 
accounting. 


5.26 
> 3 


—-+- 5 Decrement the FOE count if necessary. 






If FOEDQ completed the FREE 
PFTVRINT 






For a multiple FREE, remove all fixes. 
For a normal FREE, remove one fix. 


If the page is not completely free (there 
are more fixes on it) 





oS Fes Seca 


e 
TT <3 y) 
L_ Remove long-fix if necessary. ARBRRABAaSa Beaeaaa ae, 


6 Process deferred RELEASE requests . 


If so, and a pending second exit is found, MAR RRRRRRRRRDR EEE CGO OO 080 C0 OO Ga aaaaaaa&nha \ PCBRINT=1 


¢ Diagram 5.22 (Steps 1-6) 
FREE Subroutine 


Output 





Root PCB 


DURA RAERELELRARERARARERRRERRERRRRRRERRE REE 


PFTLNGFX=0 
PFTQ NDX=PF THQN 


PFTHOLD@=1 





IEAPCLR3 
Release indicated real 
and external storage. 


5.3] 





Add the PFTE to the hold page queue if 
necessary. 


PFTE 
PFTHOLDQ=0 


Aaananyy(A) ERIE: Eoaueue PFTDNAVQ=0 


nad IFAPRLS2 


LA : (B) PGTRSA=0 
Faw (8) 
— PGTPVM=0 
V=R Flush 


TEAVRFL 
5.13 
,_ > 3 VT 


(Continued ot Step 7) AMBBWIBABABRABARERETALELELERERERRRARRRRETET 





If the page cannot be used, dequeve 
and (if possible) invalidate it. 


If the page is marked for interception 
allocate the page to a V=R region, 


Indicate the page has been freed. 





C C 


GLZ Uuotstazednsg butbeg :G uot_oas 


®e Diagram 5.22 (Sters 1-6) FREE Subroutine (Module IEAPSI) 


See ee eee ee Se ee ee = 
| 


NOTES | 


If this is an SVC entry and register 0 # 0 (PURGE 
specified), the SVC Celay Queue is searched for 
PCB for this request (one whose PCBRWK1 matches 
ECB address in Register 1). If found, the root 
removed from the queve and its PCBRQED field is 
zeroed. If there are more requests represented by 
this root (PCBRCNT#0), the call to ROOTFREE is 
bypassed and control gces directly to Step 12. 


option | 
a root| 
the | 
PCE is| 


If this is a Branch entry, list-tyre, and the suspend 
option bit is on in the VSL, processing proceeds as 
for an SVC entry (above), excerpt that the Pranch Delay 
Queue is searched, comparing PCBRWK2 and register 1. 


If no match is found for a Branch entry, the Delayed 
Post Queue (PCBDPSTQ) is searched comparing the 
PCBRWK2 field of each root PCB pointed to Ly the 
PCBRTP of each PCB on the queue. If a match is found, 
the root PCB is marked for interception. 


FREEX is the interface between FIX/LOAD and FREE when a 
request must be backed out due to an error detected in 


FIX/LOAD. It is, essentially, FREE controlled ky the 
following set of internal switches set by FIX: 
In-real-storage-only -- Only the initial scan of 
FIX/LOAD has completed. Only FREE pages in real 
storage. 
Synthetic-end -- Error found in the middle of the 
second scan of FIX. FREE pages both in and out of 


real storage up to the point indicated by the inter-| 
nal "STOP1" and “STOP2" pointers, then FREE pages in| 
real storage only. | 
From-FIX -- Set at entry to indicate to FREE where and| 
how to exit. | 


Upon return from NEXTVMA, if end-of-list has not been | 
indicated (return code#4), and the "synthetic-end" | 
switch is on, the current VSL is compared to the inter- | 
nal “STOP" pointers to determine whether the address is | 
beyond the indicated point. If so, the “synthetic-end" | 
Switch is turned off and the “in-real-storage-only" | 
switch is turned on. | 

ib 


( 


sao --------} 


ROUTINE | | 
NAME [LABEL | 
FREE | FREE 
FREEX FREEX 


FREE and|CALLNVMA 
FREEX 


[ROUTINE | 
NOTES | 


4 If the virtual address of the page to he freed is below 


the V=R line (PVTVEQR), the scan continues. 


+ 
| 
| 

If not, the virtual address is used as the argument cf _ | 
an LRA instruction. If the condition code indicates | 
that the page is in real storage, its PFTE is calcu- | 
lated. If PFTLSQA=1, the page is SQA or LSAQ alloca- | 
ted. If PFIFXCT=0, the page is not fixed. In | 
either case, the scan continues. | 

| 
| 
| 
| 
| 
| 


If the return code from FOEDQ=0, the scan continues. 
(Note: Since PFTFXCT is not decremented, the fage is 
still fixed.) 


If PVTFRCF=1, this is a multiple FREE request and 
PFTFXCT is zeroed. If PVIFRCF=0, PFIFXCT is decremren-| 
ted by one. If PFTFXCT does not now equal 0, the scan| 
continues. 


If the page is now truly FREE (PFTFXCT=0), and the long- 
fix flag is on (PFTLNGFX=1), it is turned off and 
PVTLFXC is decremented. 


If PFTDFCLR=1, a deferred RELEASE must be prccessed. 


If the PFTE is not on a queue (PFTQNDX=0) and the page 
is in real storage, the PFTE is routed to the hold 
page queue. 


After the PFTE is enqueved (or if it was already on 
a queue, or if the page was not in real storage), 
PFTBADPG is tested. If the page is marked unusakle 
by RMS (PFTBADPG=1) (see Diagram 5.18): 


e The PFTE is dequeved (via IEAPL3). 

e Find Page is called to locate the PTE and, if 
Find Page is successful, the page is invalidated 
(PGTPVM is set to 1), and a PTLB is issued tc 
clear the DLATS (see Diagram 5.27). 


If PFTBADPG=0, or after dequeuing the PFTE and invalida- 
ting the page, if the page is marked for V=R inter- 
ception (PFTVRINT=1), V=R Flush is called to ccmplete 
(or cancel if PFTBADPG=1) a delayed V=R region allo- 
cation request (see Diagran 5.13). 
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Diagram 5.22 (Steps 7-9) 
FREE Subroutine 


Input Processing Output 


Free a Page Not in Real Storage 










oe 7 Find table entries for this page. 
| Locate the PTE and 
| XPTE for this virtual 
| page. 
| 5.27 
—E eee =I 
XPTPCBQ SF If the Find Page routine is unsuccessful 
or 
| If a PCB does not exist for this page. 3 


Pddress.of ECE or -—— 8 If a suspended FIX must be purged, 


find the PCB for this virtual address. 


If it can't be found 
PVT 


PVTSCAN as 


PVTFRCF —— 


If the PCB has no root PCB, find its 
related PCB and repeat the test. If 


7 no related PCB a 0 


For a branch or SVC entry: 


If the root PCB is not for this request, 
search for a related PCB as above. 


PCBRWK 1 





PCBRWK2 


PCBRINT 
PCBRTCB 


If a root PCB for this request is found, Root PCB 
preven its-completion NABRARABRRALARRRRARARERARARARARRRRRRRRR PWRNUHY PcoRINT=1 | 


For a pseudo-branch entry, if the root 
PCB is: 9 


Marked for interception or 

Not for this RB or 

Has no ECB, 

search for a related PCB as above, 


P 


| 

| 

| 

| 

CB | 

| 

| 

! 

| 
i + Q if the PCB for this request is not on the 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 








CALLPOST 


| 
| 
ae earret ne Les ener ce [srl 


Initiate POST of 


reguester, 


Otherwise, inform the requester. 


Search for related PCB as above. 


—-—-—+ real storage allocation queve (that is, 
PCBDFCLR processing has begun to bring the page 
PCBLFR | 


into real storage), calculate the PFTE 
address. ae 5 


If the PCB cannot be found on the real 
storage allocation queue or js not for 


a FIX request a errr > 3 
FOE Merge 


FOEDQ 
Perform POE 


accounting. 


If the PCB is found on the real storage 
allocation queve: 













Decrement the FOE count if necessary 


> WABRBRRRRRRRRRRRRRREM PCAC 


: eure 
ARRUREEEEer 4 RUnenunees PVT 
ARIARALALABRRERBRERRRARRRRARARRG! 


If the FOEDQ subroutine completed the 
FREE 


For a multiple FREE, remove all fixes. 
For a normal FREE, remove one fix. 


- 
l 





If the PCB is not completely free 


QRUUUEVBVaae’ IEAPCLR? 


Release indicated real 


Process deferred RELEASE requests. 


Grudr( ) and external storage, 
] 5.31 
Remove long-fix if necessary. Se 3 


(Continued at Step 10) 
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Diagram 5.22 (Steps 7-9) FREE Subroutine (Module IEAPSI) 


WR ate me ge a ee ae NER, pte a aga Fy Sige Pew Ge ge ee oye te ae go ae Wee a es —T 
| ROUTINE | 


| NAME 


(PCBPTE and PCBXPT respectively). 


If IEAPFP2 is successful (return code = 0), the XPTPCBC 
field of the indicated XPTE is examined. If it equals 
0, there is neo PCB for this page. 


A FIX must be purged if: 


It is a Eranch entry and the SUSPEND bit is on in the 
VSL. 

It is an SVC entry that was originally for a FREE 
(register 0 / 0). 

It is a pseudo branch entry originally for a FREE 
(that is, entry tc FREF was nct at FREEX). 


The scan table entry is computed as follows: 
PVTSCAN + 12(XPTPCBQ - 1) 


That PCB queue is searched for a PCB whose PCBVBN field 
matches the virtual address of the page to be freed. 

If none is found, the scan of the VSL continues. 

IF PCBTCF of the found PCE = 1, the PCB has no root 
PCB. If PCBRLP = 0, there is no related PCB. 


For any branch entry, PCERWK2 of the root PCR pointed 
to by PCBRTP is compared to register 1. If they are 
not equal, the root PCB is not for this request. For 
an SVC entry, the same is true except that register 0 
and PCBRWK1 are used in the corparison. If a match is 
found, the root PCB is marked for interception (for 
branch of SVC entries only). 


For a pseudo branch entry, if PCBRINT = 1, or if the 
input TCB address does not match PCBRTCB, or if 
PCBRWK1 = 0, the search for a related PCB is performed. 
Otherwise, register 10 is set to a X‘'30" post code, 
register 11 to the ECB address from PCBRWK1, register 
12 to the TCB address from PCBRTCB, and control is 
passed to CALLPOST. 


If a PCBVBN that matches the virtual address of the 
page to te freed cannot te fcund, cr PCBFXC = 0 in the 
found PCB, the VSL scan continues. 


Otherwise, processing continues as in Steps 5 and 6 
except that fields in the PCR corresponding to those 
in the PFTE are used, and PFTE queuing is skipped. 


CALLPOST sets up parameters for and passes control to 
POST at entry point IEAOPT01. POST returns control to 
the caller of CALLPOST. 


-——— OO ES Oe  - O CC SO -  e Ss s - eS  - - _  - - es se 


C 


FREE 


LABEL 


7 IEAPFP2 is called to obtain the PTE and XPTE addresses 


PURGE 


TESTQN 


fh cs cs cc ce ee = oy 


8LC 


Processing 


40 Scan of VSL complete. 


If entry at FREEX 


If RELEASE option chosen 


Input 


Restart Phase 
PVTTBASE SS 


PVTSQACT 11 Attempt to reinitiate fixes suspended 
PVTBEXTF ecause of threshold restrictions DLQSRCH 


FREE Exit Routine 





{2 Determine type of entry: BWRBWWAWesaaeaaaaa 


SVC 


Branch 











e Diagram 5.22 (Steps 10-12) 


Caller 


|IEAPCLR3 


Release indicated real 


and external storage. 


5.32 
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Type-1 Exit Routine 
(IEAOX EGO) 


Caller 


FREE Subroutine 


PVTPCPSI=0 


Register 15 
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Diagram 5.22 (Steps 10-12) FREE Subroutine 


FSS te ee ee ee eee == {- 3 a) Kea ais =a 
| JROUTINE | | 
| NOTES | NAME | LABEL | 
[pasa e anes see ae a ee ee eee 
110 For entry at FREEX, internal switches are reset before’  |FREE |ENCLIST | 
| return. | | | 
{ | [ 

141 DLOSRCH is called with the branch entry FIX delay queue | | RESTART 
| address and the branch entry cutoff threshold (PVTTBASE | [ [ 
| - PVTSQACT —- PVIBFXTF) as parameters. If the return | | | 
| code from DLQSRCH is zero, the SVC entry FIX delay | | | 
| queue must also be searched. Its address and the SVC | | | 
| entry cutoff threshold (PVTTBASE — PVTSQACT - PVISFXTF) | { | 
| are passed to DLQSRCH. | | | 
Upon return, or if the first return code from DLQSRCH | 
| was 4, processing continues. | | | 
| | | | 
112 | | COMEXO | 
{ | | | 
f2| DLOSRCH initiates delayed FIX processing as follows: |DLQSRCH | | 
| | | | 
| A If the fixed page count (PVTFXC) is not less than | | SRCHLOOP | 
| the input cutoff threshold, no reinitiation is | | | 
| possible. Control is returned with a return code | | | 
on Pd 
| B If the indicated delay queue is empty, the next | |TSTDLQ | 
| gueue (if one) must Ee searched. Control is | | | 
| returned with return code = 0. | | | 

| 

| Cc If too many pages are needed to fulfill the tor | | TSTPCBC 
| (smallest) request on the queue (PCBRWK3 > input | | | 
| threshold ~- PVTFXC), no reinitiation is possible. | | | 
| Return code = 4. | | | 
| | [ | 
| D If the root PCB rerfresents an eligible request, | | | 
| it is dequeved. If it is marked for termination | | | 
| (PCBRAB = 1), no attempt is made to restart the | | | 
| request. Instead, if its count of associated | | | 
| requests is zero (PCERCNT = 0), it is freed via | | | 
| ROOTFREE. The search then continues at "b*". | | | 
| | | | 
| E If the root PCB can be used, its address is fassed | | | 
| to FIXX to perform FIX processing. Upon return, | | | 
| the search continues at "a". | | | 
Ue a a a a Bane ree ae a OE J 


Cc 
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PFTLSQA 
PFT VRALC 


PVTFPFN 
PVTBFXL 


PVTTBASE 
PVTSQACT 


PVTBFXTF 
PVIFXC 


From I/O supervisor to 
fix a specified group 
of pages 





Diagram 5.23 
Fast FIX Routine 


Processing 







IEAPGSFF 









If the first (next) page is not in real 
storage = 4 


2 Fix the page if necessary and get the RRRRRRRARRRRRRRRERE 


next page. 
Paar 1 


PVT 
When all pages have been fixed, check 
for threshold violations. If none Caller PVTFXC+"new fix" 
%, counter 
ALANAAABABBRRBERBBRR 


PFTE 


SRN PFTEXCT=PFTAXCT+I 
















Register 15 


PETE 


PFTFXCT=PFTFXCT-1 


Register 15 


[ Return code=4 | rn code=4 






4 Free pages fixed for this request. BRRBBWVWOSOSS444 Sa a 












Caller 
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Diagram 5.23 Fast FIX Routine (Module IEAPSI) 


Bye le Ce ee pe ee a ae ee a ee ee es ee ie = Too ee 


NOTES 


Internal counters of the numker of pages fixed ("fix 
counter") and the number of newly fixed pages (“new fix 
counter") are initialized to zero. 


The test for an in-real-storage page is done with an 
LRA instruction. 


The real address (obtained from the LRA instruction) 
is shifted to obtain the PFTE index which is then 
compared to PVIFPFN. If the PFTE index is less than 
PFTFPFN, the page is in the nucleus. If it is not, it 
is determined whether the page is allocated to the 
SQA, LSQA, or V=R. If any of the tests is positive, 
the page does not have to be fixed. 


The page is fixed (PFTFXCT = PFTFXCT + 1) and the 
"internal fix counter" is incremented. If PFTFXCT now 
equals 1, the "new fix counter" is also incremented. 


A limit or threshold has been violated if: 


"New fix counter" is greater than the Ltranch entry 
fix limit (PVTEXFL). 


The new system fix count (PVTFXC + "new fix counter") 
is greater than the branch threshold (PVITBASE - 
PVTSQACT - PVTBFXTF). 


The same tests as in Step 2 are made to determine 
whether the page has been fixed. If so, it is freed 
(PFTFXCT = PFTFXCT - 1) and the "fix counter" is 
decremented. The continues until the "fix counter" 
equals zero. 
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Entered when all requests 
in a root PCB have 


Input completed asynchronously Processing 





Register ] 


Address of root PCB 


Root PCB 
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FIXLOAD2 
If the root PCB is intercepted and: 
It is not queued 


1A 


It is queued 


If there was an I/O error 


For a pseudo-branch entry 


For any other entry 


3A Determine the type of root PCB: 
If an SVC root and: 


and the real address option was 
selected 


PVT 
PVTIOERR = 
SCNSF in PVTSRRQ 


the operation failed or the real 
address option was not chosen 


CVTSYLK 


replenish processing is needed, 
delay the second exit. 


4 Determine whether the operation has 


second exit 


If so, and the real address 
option was chosen 


From Second Exit 
routine to clean 
up root PCB 





option was not chosen 


FIXLOAD3 
5 sReestablish addressability. 





3B =>: a branch or pseudo-branch root and 


the supervisor lock is set, or reserve 


completed successfully and set up for 


If not, or tf so and the real address 






Diagram 5.24 
FIX/LOAD 
Asynchronous Completion Routine 











Output 
ROOTFREE 
Route the root PCB 
to the free queue. 
5.21 
Caller 
IEAPSER 
IEAPSER2 
Inform the operator 
of the error. 
5.54 
Root PCB 


B 
LABVRRARBRAEREREEEREGERER EEE ERE PCBRFAIL-O 


> 1 A 


the operation completed successfully 


| ss PASSBACK BACK 


Find the real addresses 
of the assigned pages. 
5.21 


CALL POST 
CALLPOS2 
Initiate posting for the 


requested ECB, 















1A 





5.21 PVT 


AARVAVUAABABARRAREBERERRRERERERERRRREE SCNSF=1 in PVTDPSTQ 












Root PCB 
Schedule second exit PCBRWK4 
on delayed , 
posting queue. Regeies 
5.21 ei restored from al 









root PCB 


15-Return code=28, 32 


CVT 
CVTSEIC=1 
CVTSLID=address of TCB 


CVTSERA=address of 
FIXLOAD3 


Caller 
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g PASSBACK 


Find the real addresses 
of the assigned pages. 
5.21 















Requester's Second Exit 
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®Diagram 5.24 FIX/LOAD Asynchronous Completion Routine (Module IEFAPSI) 


A aT SR aS Tm Ore eo en yc Sy 1 
| ROUTINE | 


| 
| NOTES | NAME | LABEL 
+ 
1 | FIXLOAD2 
2 The parameters passed to IEAPSER are: 


Register 0 -- Error code (from PVTIOERR) 
Register 1 -- Requester's TCB address (from PCBRTCB) 


If the high-order kyte of PCBRWK5 = X‘'80°', the root FCB 
is for a pseudo branch entry. 


3 If there is a nonzero value in PCBRWK1 (that is, if 
PCBRWK1 points to an ECB), the root PCB is for an SVC 
entry. 


FIXLOAD2 
page fault is satisfied. 


If the reserve replenish queue is not suppressed, the 
pages reserved for SQA allocation must be replenished 
before completion processing can continue. 


4 The “page supervisor in control" bits (PVTPGNCK) are 
saved and all are set to zero kefore the seccnd exit. 
They are restored upon return. Control is passed to 
the second exit address via BALR 14,14. Return is to 
FIXLOAD3 whose address is in CVTSERA. 


FIXLOAD3 


a ce ce ce cs es ee ee es ee ees ee ke ee 


-— — — — H+} 


| 
| | 
| | 
| | 
| | 
| | 
| | 
I | 
| | 
| | 
| | 
| | 
. | 
| If the supervisor lock is on (CVTSYLK = 0), completion | 
| processing must ke deferred until a pending disabled | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
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Diagram 5.25 
Delay Post Queue Handler 


From the dispatcher Processing 
IEAPSI3 


1 Schedule the paging task for any second Release Queve 
exits represented by PCBs on the delayed Suppression 
IEAPCRQS 


Allow processing of the 





posting queue, 


delayed posting queue. 
5.5] 





From the Queve 
Scanner to 
initiate deferred 
second exits 


Caller Output 


IEAPSI2 


2 sif the supervisor lock is on, suppress the au! 
delayed posting queue. VARA RARRRLELRRRRRRLRRRARERRRRRRRARRETE 





Input 


Register ] Caller 


Address of PCB 
CVT 
CVTSYLK _— 


PCB 


3 Route the first PCB to the free queve and WRBRRBRBABEBELARLEERRRERERERERERER ERE! 


initiate completion processing for the 
appropriate root PCB. 


Root Exit Routine 


FIXLOAD2 


Schedule second exit. 
5.24 










Root PCB 


PCBRTP 
PCBRGOTO 
PCBFQP 


Caller 
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e Diagram 5.25 Delay Post Queue Handler (Module IEFAPSI) 
ar SS era ea ee gg an ee ee ee ee ee 5 (erase ansaid 
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When a second exit cannot be innediately taken after 
the asynchronous completion of a FIX or LOAD operation 
for any reason (for example, the supervisor lock is set 
for a disakled page fault, or a suspended FIX is 
completed by a restart from FREE), the second exit is 
deferred and a PCB representing it is placed on the 
delayed post queue (by FIXLOAD2, the Rcot Exit 
routine). MIEAPSI3 is invoked ry the dispatcher, when 
the supervisor lock is reset, to initiate second exit 
processing. 


When the paging task is dispatched, the Queue Scanner 
will invoke IEAPSI2 (below) to process the requests on 
this queue. Interruptions are disabled after entry. 


If the supervisor lock has keen reset (CVTSYIK = 1), a 
disabled page fault is pending and the second exit 
requests must remain deferred. 


The root PCB is pointed to by PCBRTP and the entry 
point of the Root Exit routine (FIXLOAD2) is in 
PCBRGOTO. 


If more than one PCB is on the delayed post queue, the 
Queue Scanner will reenter IEAPSI2. 


Interruptions are enabled before exit. 


ROUTINE 
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Free storage for an FOE. 









Diagram 5.26 
FOE Merge Routine 























Processing Output 
IEAPSI5 
1 siIf the first (next) FOE should not be 
merged, get next FOE and repeat. 
If none Caller 
2 Attempt to add the FOE to the indicated 
FOEMRG 
Step 3 
If unsuccessful, mark the FOE for 
interception. WBE BEEEEEEREEESE EGE aEaaaaa \ FOEINT=1 
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Process next FOE, =a 1 
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FOEON 
FQEDQ 
FOEMRG 
3 sf the entry to IEAPSI was a branch entry Caller 
c Register 15 
Ann nw teeeeeeRBRRRPAUUUaee UMP] Rete codes | 
4 sFind a FOE for this virtual address on 
the TCB's FOE list. 
If one is found = 6 
: Call 
If none and this a FOEDQ request aller Register 15 
y, 
Ax rn ne reeeseasanwaae’ NAN NN AANA 
5 Obtain a new FOE and add it to this Register 15 
; 
Ang>(A) Get storage for an FOE. ; 
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FOEFLINK 
Caller FOE (New) 
6 siIf the entry was at FOEON or FOEDQ FOEFLINK=-next FOE 
and the FOE should not be processed Caller 
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7 Update the count of fixes in this FOE 
appropriately, Register 15 
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Diagram 5.26 FOE Merge Routine (Module IEAPSI) 
PSSST Sse ee ee ee ee ee a ee ne eee 2 ia aia 


| 
| NOTES 


FOEs are chained by the FOEFLINK field. 


The virtual address (from FOEVBN) and the fix count 
(from FOEFXCT) are passed to FOEMRG. 


FOES only exist for SVC entries to IEAPSI. 


The input virtual address is compared to FOEVINDX. 

If they are equal, the FCE has been found. if FOEVINDX 
is greater than the input virtual address, the search 
stops, Since FOES are chained in ascending order by 
FOEV INDX. 


The address of the next FOE on the chain is placed in 
the new FOE‘'sS FOEFLINK field, and the address of the 
new FOE is placed in the previous FOE‘S FOEFLINK. The 
fix count (FOEFXCT) of the new FOE is set to 1 for 
entry at FOEON or to the input fix count for entry at 
FOEMRG. 


If the FOE is marked for intercertion (FOEINT = 1), 
processing on it should not continue. 


For entry at FOEON, FOEFXCT = FOEFXCT + 1); for entry 
at FOEDQ, -1. For entry at FOEMRG, the input fix count 
is added to FOEFXCT. 


If FOEFXCT now equals zero, the FOE is dequeued (by 
modifying appropriate FOEFLINK fields) and freed. 


4 | FOERMBR obtains (via GETMAIN RMBRANCH) or frees (via 


FREEMAIN RMBRANCH) storage for an FOE. 
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Diagram 5.27 
Find Page Routine 
Entered by any supervisor 


routine to obtain the address 
of PTE and XPTE associated: 


Input Processing Output 


ith a virtual page ith a PCB 
Register 1 (PCB entry) Se bails 


PCB address 
PCBVBN 


or 
Register 1 (Register entry) }@—4- —— —— — — —— — — —— — 1 Set appropriate entry switch; derive the 


Virtual eddress input segment; and locate the segment 


table entry. 


}EAPFP (PCB entry) 


IEAPFP2 (Register entry) 







2 Ifa page table does not exist for this Register 15 
segment ANRURRRRRRRRRRRRRRRBRRRERD, Return code= | 


Segment Table Entry 


SGTPAM 
SGTPTO SS ee 3 Determine the virtual address of the page 


table. 


Caller 


Translate Real to Virtual 
[EAPTRV 


Calculate the indicated 
PCB (PCB entry) alculare e inaicare 


PCBVBN am 


virtual address. 





[ 5.47 
Register 1] iRectiter entry) | Register 15 
IFunsuccessful MMUUWRRRARRRRBERRRRRRRRERRE' 
Virtual address 
ee 4 Calculate the virtual addresses of the Caller 
PTE and XPTE. 
PCB 


5 Place the addresses in the indicated places: 
PCBPTE 

For a PCB entry — tb} n] rcerre 
PCBXPT 


Register 15 
WRRLEBABEBEBEERRREREBERS 


Register 0 


Address of PFTE 


ie) bag 


For a register entry(~—_____ 


Register ] 


Address of XPTE 





Caller 
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Diagram 5.27 Find Page Routine (Module IEAPFP) 
a ee ee ee ES AERTS 
| ROUTINE 


| 
| NOTES | NAME LABEL 


The high-order byte of PCBVBN for a PCB entry. | IEAPFP 
Byte 1 of register 1 for a Register entry. | IEAPFP2 
| 
The segment table entry is located as follows: | LEAPFP 
CVTSEGB + 4 * input segment number. jand 
CVTSEGB is the segment table origin. | IEAPFP2 
4 is the length of an STE. 


FINDPG10 


If SGTPAM=1, no page takle exists for this STE. 


| 

| 

| 

[ 

| 

| 

[ 

I 

| 

| 

| 

| The real storage address of the page table origin (PTO) 
{ is in SGTPTO. 

| 4 The virtual address of the PTE = virtual address (PTO) 
| + L*P. 

| L is the length of a PTE (2 bytes). 

| 
\ 
| 
| 
| 
| 
| 
L 


P is the page number (bits 8-11 of the PCBVBN or bits 
16-19 of register 1). 


The virtual address of the XPTE = virtual address (PTO) 
+ 32 + L*P 

L is the length of an XPTE (8 bytes). 

P is the page number. 


eee ee ee ee ee ee ee Leer 
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Entered by the Queve Scanner 
to process PCBs on the task 
post queve 


Input 


Register | 
Address of task post queve 


Register 3 
Address of PVT 


PCBSKIP 
PCBRIP 
PCBRBN 
PCBDAD DF 
PCBDADD 
PCBYHTC 
PC BIOCMP 
PCBIOI 
PCBFQP 
PCBMIG 
PC BRLP 
PCBNQN 
PCBXPT 


PVTRRTP 
SCNSF(in PVTINITQ) 





Entered by I/O FLIH when at least one PCB has 


* Diagram 5.28 
Page I/O Post and 
Task Post Queue Processor 


been completed through an |/O operation 





1 
2 





Processing 
[EAPIOP (Page I/O Post) 


IEAPTQP (Task Post Queve Processor) 


Output 







Indicate type of entry and access 
appropriate queve. 


Clean up PCB's resources if the request 
has been canceled, 


PVT 
WARARABARALALALALARALARERRRRRRRRRRREREP vcore: | 
[ PGOTPROC sis 1 


Make the allocated 
page frame available, 
5.29 


IEAPAUX2 
6 Free external 


storage allocated, 
PGOTPROC 


Make the page frame 
available. 
6 


Release the PCB's page frame if there 
was an I/O error or if a page-out 
operation was completed, 





3.29 


PGINPROC 


Indicate page frame 
6 allocated, 


Make necessary queve modifications if 
a page-in operation is complete. 


When the I/O is not complete and: 


Entry was at IEAPIOP, get the next 
PCB 


If none 
Entry was at IEAPTQP, continue. 





Signal completion to the initiator of the 


/O 
x 
<0 
Get next PCB, 


If none, continue. 


NOTIFY 


Inform the originator 
of 1/O completion. 
5.29 







DISMISS entry point 





> 2 


If SQA/LSQA replenishment is needed MRMBRRBRARBRRRRRRERERREEREEE EEE EERE EEERE 


Release Queve 
Suppression 
IEAPCRQS 


Release the reserve/ 


PVT 
SAAD PVIRRTP=O 


replenish queue. 


5.51 


Release Queue 

Suppression 
IEAPCRQS 
Release the page 





Allow page I/O to be initiated, if 
suppressed, 


I/O queue. 





3.51 


IEAPCBM 
Place the PCB on the 
I/O active queue. 
5.49 


When entry at |EAPIOP 















sUnEannp(s ) 






When entry at IEAPTQP Caller 


c 


2G uoTIOaS 


tazedns butbed 
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e Diagram 5.28 Pagd I/O Post and Task Post Queue Processor (Module IEAPIOP) 
(CSN ee re ee ene Se re ee p ceria emaias Seber 1 


| NOTES 


oa h w 


PVTPCIOP is turned on at entry and off at exit. A 
switch is set to indicate entry at IEAPTOP. 


This processing is attempted whenever the PCBSKIP flag 
is on. If the “release-in-post* flag (PCBRIP) is off, 
go immediately to Step 6. PGOTPROC is called only if 
PCBREN=-0, and IEAPAUX2 is called only if PCBLADDF=1. 


If the PCB has related PCBs, this “notification” logic 
is performed for each PCB on the related chain. 


PVTRRTP is set by the Reserve Replenish Queue Processor 
when it has more work to do but there are PCEs on the 
task post gueue or by Page Replacement when no pages 
could be replaced. If PVTRRTP=1, it signals the Task 
Post Queue Processor to release the reserve replenish 
queue. 


The next queue number (PCBNON) is set to the free queue 
unless the PCB is marked for migration, in which case 
PCBNON is set to the migration queue. 

If the PCB has related PCBs and: 


e Entry was at IFAPTOQP, PCBCON in the related PCBs is 
set to the task post queue. 


® Entry was at IEAPIOP, PCBCCN in the related PCEs is 
set to the I/O active queue. 


If the PCB has no related PCBs or when all related PCRs 
have been handled, and if the original PCB was fcr 
migraticn, the original PCB is reinitialized by setting 
all fields other than queue pointers and queue numbers 
(PCBFOP, PCBBQP, PCBNON, PCBCON) to zero. In addition, 
if PCBXPT#0 in the original PCB, XPTPCBQ of the XPTE 
pointed to by PCRXPT is set to zero. 


[ROUTINE | | 
| NAME [LABEL | 


| IEAPTOQP | IEAPTOP 
|and 
| IFAPIOP | IEAPIOP 


| 
| COMMON 


ANCEL 


4 62«4# 


ESTYPE 


GONOTIF1 


6 
a 
fa 
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SSS — SS Se Se See 
sd 
td 
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Processing 
PG OTPROC 
PCB 1 If a page is marked for V=R interception 


PCBRBN 


PFTE 


PFTVRINT 


2 Make the page frame available. 


Anp() 


PGINPROC 
3 Route the PCB to the proper queue: 
Migration with no related PCB 


Migration with related PCBs 


PCB 
PC BMIG 
PCBRLP 


Not migration 


4 Determine whether this page is fixed. 


Aas) 


Long fix, continue processing. 


Normal fix 
No fix 


PFTFXCT 


PFTLNGFX 





5 Ifa page is marked for V=R interception 


PVT 
PVTVRINT 


Register 4 
Address of PCB 







NOTIFY 
6 lf this PCB is marked for migration 


If "no post" indicated 


If 1/O error and PCB not skipped 


PCBMIG 
PCBTCF 
PCBYHTL 
PCBRTP 





Decrement wait count 


Aup(D) 


PCBSKIP If more actions are waited on 


PCBNOP If not a disabled page fault or 


if NEW 2 Master Scheduler 





Scheduler Set NEW=0. 


PCBRTP 
Root PCB 


PCBRGOTO 
















7. For a PCB not associated with a root PCB; 


Disabled page fault and NEW< Master 


For a PCB associated with a root PCB and: 
No other PCBs associated with this root PCB 


Other PCBs associated with this root PCB 


e Diagram 5.29 
Page I/O Post — Page-out, Page-in, 
and Notification Subroutines 


Output 










oe AEEBEEEEEEEE EEBEEEEEE 


V=R Release p 
IEAPVRS 6 
Allocate page to g 


VER region, 
Caller 5.11 


PFTE NQ 


IEAPRLS2 
Move the PFTE to the 





SAAR PFTPCBSI=0 
PFTONAVO=1 


PFTQNDX=PFTAVQN 












available page queue. 


3.17 


Caller 








NANA WRRERERRRREY, 





Call y 
ad g PCBNQN=PCBAUX 
IN NN BABB Bseaes 
(B) PCBIOI=0 
BX 
PCBIOCMP=0 
Caller 
PFTE NQ 
IEAPRLS? cB 
Move the PFTE to PCBNQN=PCBMIGQ 
the hold page sueue _ or PCBFREE 
V=R FLUSH PGTE 
IEAPVRFL PGTPVM-0 
Allocate the page 
to V=R region. PFTE 
Caller 5.13 





PFTPCBSI=0 


Caller Reference and change 


bits=0 











Caller 


IEAPSER 
JEAPSER2 
Caller Schedule abnormal 
termination. 5.54 


PFTHOLDQ=1 


PFTQ NDX=PFTHQN 












IEAQDSO02 


| Task Switch 


Ready the faulting task. 
3.17 





Caller 
RB 
( D PEW] eawer=rawer-1 | 
Caller PCBROOT 
mE) Roo! Exit Routine | SENS PC BRCNT=PCBRCNT-1 


Address in root PCB. 
5.39 PCBRFAIL=1 


Caller 
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® Diagram 5.29 Page I/O Post - Page-out, Page-in, and Notification Subroutines 


(Module IEAPIOP) 


a ce ee en en ee ww ew Oe ww ww we we T eee. 


If the page-out was for a Swap-out, the PFTE is added 
to the available queue, since it cannot ke reclaimed. 


A PCB for migration with no related PCBs is routed to 
the auxiliary storage allocation queue and marked for 
page-out (PCBIOI=0) for continuation of the migration 
process for this page. 


A PCB for migration with related PCBs is routed to the 
Migration queue so that migration can continue with a 
different page. 


V=R Flush is called to move the page akove the V=R Line 
(if not long-fixed) or to notify V=R of a long-fix. 


If the page represents a satisfied page fault 
(PCBYHTC=0 and PCBNOP=0) and the faulting task is wait- 
ing for this event only (RBWCF-1=0), then Task Switch 
is called, unless for a disakled page fault task and 
NEW < Master Scheduler. 


If the original PCB indicates I/O error (PCBYHTC=1), 
then NOTIFY indicates this in the root PCB (PCBRFAIL=1). 


a mm re a ew en a a a a a a a a we ae ee 


| ROUTINE 
| NAME 


PGOTPROC | PGOTPROC 


PGINPROC| PGINPROC 


CHECKVR 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
NOTIFY | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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Entered by SVC FLIH to 
handle a RELEASE macro 
Input instruction (SVC 112) 


Register 0 


Beginning address of 
the virtual area to be 
released 


Register | 


Ending address of 
the virtual area to be 
released plus 1 byte 


SVC Old PSW 


Paton tay = 


Register 4 


Address of TCB 





vie 
| 
| 
| 
ed 
ea 
| 
| 
| 
| 
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Diagram 5.30 
Release Routine (User SVC) 
(Releasing Real and External Page Storage) 


Processing Output 


IGC112 


1 Establish "TESTADDR” 


Type-1 
s Exit Routine Register 15 


AWIBABRRERRREEERRE SEER EREREEE EERE TE N 


IEAOVLOO 


fd Ensure protection 
of storage. 


1A If awhole page cannot be released 





2 Check the validity of input, if necessary 










Register 15 
finvdlid RQWRRBERRREBARRRERARRERERRARRRRRRRRRRD 


Type-1 
Exit Routine 





3 Release the page begining at "TESTADDR"” IEAPCLR3 


Free the indicated 


Update "TESTADDR" 
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Diagram 5.30 Release Routine (User SVC) (Module IFAPCLR) 

[oS eee See te eT Pea Sa ee | a Sho 1 

| | ROUTINE | 

| NOTES {NAME | LABEL 
] The paging-supervisor-in-control flag (CVTPGSIC) is IGc112 

turned on at entry and off at exit. 


2 TESTADDR is an internal pointer. Initially, it is set 
to the value in register 0 rounded up to the next 
higher page Loundary. Each time a page is released it 
is incremented by 4096. 


3 If the caller does not have a protection key of 0, the 
validity of the address must be checked to ensure that 
the caller is authorized to release this page. 


On entry to IEAPCLR3, register 1 = TESTADDR and 
register 3 = PVT address. 


Soe a ee a a ee ee ee ee he —L—-——___-—_ 


| | 
| | 
| | 
| \ 
[ | 
| | 
| | 
| If the input in register 1 minus TESTADDR is less than | 
| h096, a whole page cannot be released. | 
| | 
[ { 
| | 
[ [ 
l | 
| | 
| | 
L 


bes ee ee Se es ee ol 


962 


Input 





Entered by IEAPS] to handle 
a RELEASE option on a Page 
Service request or by FREEMAIN 


to release a freed page Processing 


Register | IEAPCLR2 


Address of first VSL —_—— + r -_-— 1 If the first (next) VSL entry should not be 


processed, get the next entry and repeat. 


If none 
VSL | 
VSLCONT | 
VSLNULL SS gee pes 2 Establish "TESTADDR". 
VSLSTART 
| 2 A_ Determine whether a whole page can 


VSLAST 
VSLENDPI Sogo 2d 


be released. 


If none 


Release the page beginning at "TESTADDR". 


Update "TESTADDR". 





If not, access the next VSL entry. 


—>- 1 





JEAPCRL3 


ZrAARAARARAAARRRARBRRRRRBEE 


RELEASE 


Free the indicated 


page. 


> 2» 


3.32 





e Diagram 5.31 
Release Routine (Supervisor Branch) 
(Releasing Real and External ‘Page Storage) 


Output 






Caller 







Register 15 


[tum cole 


Caller 
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e Diagram 5.31 Release Routine (Supervisor Branch) (Module IEAPCLR) 


(Srey pee Sa oe a a ap a ee ee ee Se ee 5 San eas STs SP sSor 1 
| | RCUTINE | | 
| NOTES | NAME |LABEL | 
| ----~---------~--~------- -- + 5-2-2 2 n--3 2 -22--f ooo $-------- { 
| 1 PVTPCCLR is turned on at entry and off at exit. If | LEAPCLR2| | 
| VSLCONT=1, this VSL is not to be processed and the VSL | | | 
| pointed to by VSLSTART is accessed next. | | | 
{ | | | 
| If VSLNULL=1, this VSL is skipped and the next entry is | | | 
| accessed. | | | 
| | | | 
| If VSLAST=1, this is the last VSL. | | | 
I | | | 
| 2 TESTADDR is handled as in 1GC112, Note 2, except that | | | 
| it is initially set to the value in VSLSTART of the VSL | | | 
| being processed and is suktracted from VSLENDP1 to | | | 
| determine if a whole page can be released. | | | 
| | | | 
| 3. On entry to IEAPCLR3, register 1 = TESTADDR and register| | | 
| 3 = PVT address. | | | 
be Ose eS SoS See a eee ee ee ee eee eee dot oeesin becce esc J 
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Entered by IEAPSI to handle a FREE operation 


Diagram 5.32 (Steps 1-6) 
Release Routine (Branch) 
(Releasing Real and External Page Storage) 


for a release deferred page or from other - 
Input Release entries to release a page Processing Output 
IEAPCLR3 
1. Determine whether the page can be released. 


GOVRFLUB 


SQABOUND 2 


TE 


PGTPVM 3 


PGTPAM _ 


XPTE 


XPTPCBQ 


CB 
PCBFXC 


PGTPAM 
PGTRSA 


VT 


PVTPFTP 


PFTE 


PFTDFCLR 
PFTFXCT 





PFT PCBS| ) 


PTE 


PGTPAM 





ms 
bas 
: If it is not assigned by GETMAIN, 


(B) defer release 


Caller 


|IEAPFP2 
Locate the PTE and 


If it is in the nucleus or V=R area 


XPTE for this page. 
5.27 


If it cannot be released 





If a PFTE is assigned to this page 


If not, and it is an SQA page Caller 





Determine whether a PCB exists for this 
page. 


If one exists not on the real storage 
allocation queue 


If one exists on the real storage 
allocation queue 


Locate the PCB on 
the queue. 


If it is not found or does not exist at 
all 


PTE 
(ay aw PGTRSA=0 


PCB 


Caller (B)xw S PCBDFCLR=0 


ARBRE BEEEEEEEEE EERE EEEEEEEEEEE > PCBDFCLR=1 


If it is found and is not to be fixed 





If it is found and is to be fixed 








PFTE assigned, free real storage 
PFTE 
ive the PFTE add d determi 
Sill Ud ii cage beatae AARABRARRRRRRERERRRERRRRRRRRRRRRRRRRRRED PFTDFCLR0 
whether the page was previously marked for 
deferred release. If so, and if it has been 


assigned by GETMAIN since the RELEASE 







Caller 


Determine whether the page is fixed. 


PFTE 
If so, and it has been assigned by GETMAIN cnn NN ST PFT DECLR=1 
IF so, and it has not been assigned by Zz 
GETMAIN, defer the release, INA NANNANANAA SN ~~ PTE 


If not, invalidate the PTE. ee PGTPVM=1 


If a paging operation is in progress for 






this page FINDPCB 
Locate the PCB on 
its queue, 
5,33 
If the PCB was found => 9 


(Continued at Step 7) 


662 uotstazedns butbed :G uotyDaS 
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Diagram 5.32 (Steps 1-6) Release Routine (Branch) (Module IEAPCLR) 


Gr pie pe ee gee ey DNR bee se ape ee ee ge ee ete eae ge yee Cae Me ee ee —T 
|RCUTINE | 


C—O a a a 


z 
3 
eh 


1 If CVTREAL is greater than the input address, the page | 
is in the nucleus or V=R area and cannot be released. | 
If the FINDPAGE return code is nct zero, the segment is 
unassigned or an internal error was found. The page 
cannot be released. If the inrut address is greater 
than or equal to SQABOUND, the page is in the SQA area 
and cannot be released. If the page is invalid 
(PGTPVM=1), it cannot ke released. 


io) 


If the PCB is found on the real storage allocation queue 
and it is for a FIX request for a page that is not 
assigned by GETMAIN the deferred clear flag in the PCB 
is set (PCBDFCLR=1). When IFAPALOC obtains a PFTE for 
this page it will set the deferred clear flag in the 
PFTE. When the fix is removed by FREE, FREE will call 
IEAPCLR3 to release the page. 


The PFTE is located as follows: 


# 


| 
| 
| 
| 
| 
[ 
| 
| 
| 
| 
| 
| 
| 
| 
[ 
PFTE index (from PGTRSA) + PVTPFTP (the PFT origin) = | 
PFTE address. | 

| 

If the deferred clear flag is on (PFTDFCLR=1), IFAPCLR3 | 
was prokably called Ly FREE to release a page that could| 
not be released before because it was fixed. If, how- | 
ever, GETMAIN reassigned the page between the time the | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

a: 


release was requested and the time FREE removed the fix 
(if PGTPAM=1), the release is ignored. 


o1 


If the page is fixed and is not assigned by GETMAIN, 
the release must be deferred until the fix is undone by 
FREE. The FREE processor in IEAPSI will call IEAPCLR3 
again to release the page. The storage key is set to 
zero and fetch protection is indicated so that the user 
cannot have valid access to the page while the release 
is pending (unless another GETMAIN is issued). 


|NAME 


IEAPCLR3 


fp me i ee ee ee 


a aes | 


| 
LABEL | 


SS cS cS ce Ss ee es ee ee ee he 


| 
L 
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Diagram 5.32 (Steps 7-15) 
Release Routine (Branch) 
{Releasing Real and External Page Storage) 


Input Processing Output 


7 If no PCB was found or on PCB exists (no al 


baging: operation iniproares), treecthe WABABREBERBREEEEREEEREEREREEEREREREERRERERE EES 
anaes a nS 






























Make the page frame f 
Erle available, g PETE 
= 8 Determine whether the input page is an Y PFTLSQA=0 
SQA or LSQA page. s 
either RAWRBBBALARRARRELRRRRRRRRERRERRRERREEE PVT 
If SQA PVTSQACT=PVTSQACT-1 


If LSQA or neither 





v, 
ANRRRAARBERRRERBERREBEE WABRRERREREREREREE PFTWHOSE=0 
Page |/O in progress, disassociate Paging I/O 






PCB 
Q Indicate |/O should be skipped and that PCBSK IP=1 
the resources allocated to it must be WBBIaABasBa aa 
freed. LARALAARRERRARERREERERRERERERERY 








, 
4 
, XPTE 

: 


Panrar wa PTE 


LW, 
d 
, 
s 
, 
, 
gp 
, 
4 
, 
y 
Z 


10 Disassociate the virtual address from the 
PCB Paging I/O. LABERREEEEEE ERG QGQE <a 


PCBIOI 11 If this is a page-in operation and: 


the PCB is not in the real storage 


allocation queve MARAE’: OE EEOEEEREEEEEEaEGE 


the PCB is on the real storage 


allocation queue (14) 


12 Fora page-out operation, free the FREEREAL 


iated I st i. ; 
associared real $s orage Fie the PFTE 


representing the 
indicated real storage 


page. 








XPTXAV 
XPTLPA 
XPTXADDR 


5.33 


13 Determine whether external page storage 
has been assigned. 


If so, indicate to POST that it must 
free it. 





If not, or if so but it is an LPA page Caller 


PCBBN=0 


yr 
Paxannnneneaneenee NANAN A ee 


p PCBDADDF=1 1 
Release Auxiliary Storage , PCBDADD=XPTADDR 


14 Determine whether external page storage 
has been assigned. XPTXAV= 
XPTXADDR=0 
XPTLPA= 








AREER EE AEE) 


If not, or if so but this is an 
LPA page ; WABaaBaswaaeaa 
15 Free the storage occupied by the input ArrreUWWWUWBBBWBVaae SANA 


page. s Auxiliary Storage Manager 


") JEAPAUX2 


y) 2 Free the indicated 
y NNN external page storage. 






. 





3.63 





Caller 
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Diagram 5.32 (Steps 7-15) Release Routine (Branch) (Module 
(eee ea ee ee ee ee Toes am J 


The real storage address (PGTRSA) is set to zero to 
prevent future page reclamation. 


Since SQA pages are not paged and so have no XPTEs 
assigned to them, the normal route cannot be taken. 
Therefore, no further action on them need be taken. 


Setting PCBRIP=1 informs IEAPIOP (Page I/O Post) that it 
must free either real or auxiliary storage fcr the page. 


For a page-in, the Release routine frees auxiliary 


storage and Post frees main storage according to PCBRBN. 


For a page-out, the Release routine frees main storage 
and Post. 


Frees auxiliary storage if any was assigned. 


The only time the XPTLPA flag should be on is when 
IEAPCLR3 is entered Ly FREEMAIN after a TSO user has 
logged off. 


PCBDADDF and PCBRBN are tested by IEAPIOP to determine 
which type of storage it must attempt to free. If 
PCBDADDF=1, the page I/O routine Post will free auxil- 
iary storage using the encoded address in PCBDADD. If 
PCBRBN*¥0, Post will free real storage using the address 
in PCBREN. 


IEAPCLR) 


[ROUTINE | 
| NAME 


ZOE 


Input 


VT 


PVTSCAN 


XPTE 
XPTPCBQ 






Input virtual address 
CB 
PCBVBN 


SCNTE 
SCNFST 


PFTQNDX 


PFTBADPG 
PFTVRINT 





Diagram 5.33 
Release — Subroutines for 
Searching PCBs and 
Freeing Real Storage 


From 5.32 . 
Steps3andé Processing 


FINDPCB 


are paca 1. Calculate the scan table entry for the 
indicated PCB queve. 











tie) ee 2 'f a PCB for the input page does not 
Record the minor 

_——_— 4 software error. Output 

| 5.54 

| Otherwise Caller Register 15 
aaa eae | Return 2 = Found=PCB address 

LARREEEDEEE EEG Gaaaaaaa as 
Code 3 =not found=0 
From 5.32 


Steps 7and12 Processing 


FREEREAL 


3 Dequeve the PFTE if it is queued. PFTE Dequeve 


IEAPRLS3 
Remove the PFTE 





PFTHOLDQ=0 
PFTQNDX=PFTAVQN 
PFTONAVQ=1 


from its queve. 





9.18 





4 if this page is not usable Caller 


5 if this page is marked for V=R interception VER Release 


IEAPVRS 
Allocate the PFTE 
to a VER region. 





5.11 


Caller 
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Diagram 5.33 Release - Subroutines for Searching PCBs and Freeing Real 
Storage (Module IEAPCLR) 
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+ 
1 The scan table entry is located as follows: | FINDPCB 
PVTSCAN + (XPTPCBQ-1) #12. 


2 The PCB is searched for by comparing bytes 1 and 2 of 
the input virtual address with PCBVBN. If they are 
equal, the PCB has been found. 


If the queve is empty (SCNFST=0) or the search fails, 
an error condition exists (PFTPCBSI or XPTPCBQ is 
incorrectly set). 


The page is not usable if the “RMS~detected-solid- 
storage-failure" flag is on (PFTBADPG=1). 


5 If PFIVRINT=1 (set by IEAPVEQR), the page is needed for 
a V=R region. 


6 IEAPRLS2 adds the PFTE so that it will be removed first 
Since the released page cannot be reclaimed. 


| 
| 
| 
| 
| 
l 
| 
[ 
[ 
| 
3 The PFTE is on a queue if PFTONDX#PFINON. | FREEREAL 
| 
[ 
| 
l 
| 
| 
l 
[ 
| 
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‘Create Page Table Routine 
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Diagram 5.34 Create Page Table Routine (Module IEAPTCTL) 
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| ROUTINE | | 
| NOTES | NAME | LABEL | 
a ee ee oes Soo eee +------- ~t------— 
| 1 If the “page-table-in-SQA* option is chosen (bit 0 on |Create |IEAPTCD | 
| in register 1), subpool 245 is used. Otherwise, |Page | | 
| subpool 255 is used. |Table | | 
| | { | 
| 2 The parameters passed to GETMAIN are: | | CREATEOO | 
[ | | [ 
| Register 0 - Byte 0 - subpool number | | | 
| Bytes 1-3 - 160 (dec.) | | | 
| Register 1 - any negative value | | | 
| | | [ 
| Upon return from GETMAIN, the entire 160-byte area is | | CREATE10 | 
| zeroed and PGTPVM is set to 1 in each of the first 16 | | | 
| halfwords in the area. | | | 
| | l [ 
| 3. The real address of this area is placed in koth the | | CREATE30 | 
| system and user SGTs as follows: | | | 
| | | | 
| e The STE displacement = segwent-—number-being-— | | | 
| processed times 4. | | | 
[ | | l 
| e This displacement is added to CVTSEGA and CVTSEGB | | | 
| to get the STE addresses. | | | 
| { | | 
| e The real address of the page table (obtained via | | | 
| an LRA instruction using the address returned Ly | | | 
| GETMAIN as input) is placed in SGTSTE of both STEs. | | | 
| | | [ 
| e SGTPAM is set to 0 (validated) in the system STE. | | | 
| | | { 
| e If the validate-UST option is chosen (register 0, | | | 
| byte 0, bit 1 = 1), SGTPAM is set to 0 in the | | | 
| user STE. Otherwise, it is set to 1. | | | 
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storage. 
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Diagram 5.35 Destroy Page Table Routine (Module IEAPTCD) 
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If the “page-table-in-SQA" ogption is chosen (bit |Destroy | IEAPTCD 
in register 1), subpool 245 is used. Otherwise, |Page 

subpool 255 is used. |Table 


oh, 


NO 


The following parameters are passed to IEAPSIBR: DESTROO 
Register 1 - Byte 0 - X'28" (indicates FRFE and 
RELEASE) 
Bytes 1-3 - starting address (input 
segment number concatenated with 
16 O-bits on the right) 
Register 2 - Byte 0 - 0 
Bytes 1-3 - ending address (input 
segment number + input segment 
count) 


PVIFLAG1 is set with PVTFRCF (X‘'02') so that FIX counts 
will be zeroed. (On return, it is set to 0.) 


a) 


If the starting segment number (register 0) = DSPSTI, 
DSPSTI and DSPSTC (pointed to by PVTSPSTI and PVTSPSTC 
respectively) are set to 0. 


The real address of the PGT is extracted from the STE 
(CVTSEGB + 4 * segment-number-being-processed) and 
passed to IEAPTRV in register 1. SGTPAM is set to 1 
(invalidated) in both the systen and user STEs. 


ad 


o1 


The parameters passed to FREEMAIN are: 


Register 0 - Byte 0 - subpool number 
Bytes 1-3 - 160 (dec.) 
Register 1 - Byte 0 - 0 
Bytes 1-3 - virtual address of PGT 
On return, SGTPAM is set to 1 in both STEs. 
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Diagram 5.36 Swap Control Routine (Module IEAPSWAP) 
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Stage 3 Set-up Luu> 9 
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® Diagram 5.37 Swap-in Set-up Subroutine (Module IEAPSWAP) 
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Swap-in processing is ferformed in multiple stages by 
the following routines: 


SWAPIN - Stage 1 and 3 set~-ur. 
IEAPINi - Stage 1 completion and Stage 4 set-up. 
IEAPIN3 - Stage 3 completion. 
IEAPINSY - Stage 4 completion. 
ROOTEXIT - Swap-in completion. 


LSQA page-ins are scheduled first (Stage 1) and cther 
page-ins Specified ky SPCT entries (Stage 3) next. 
When Stage 1 page-ins are conpleted, page-ins repre- 
sented by entries in the SPCA (other than Stage 1 or 3 
entries) scheduled (Stage 4). An effective, uninter- 
rupted Swap-in occurs whenever Stage 4 scheduling 
occurs while Stage 3 I/O is still in frogress or when 
the number of pages to be swapped in is 16 or less (no 
Stage 4 needed). 


A ‘region ready for restore’ indication is given when 
all SPCT pages have keen read in (Stages 1 and 3 con- 
plete), but before all Stage 4 page-ins have completed. 
Thus, Swap-in need nct be conpleted for the whole 
region before the user can continue processing. 


The branch entry FIX threshold = 
PVTTBASE-PVTSQACT-PVTBXFIF-SPCTNERL (the numter cf 
LSQGA pages required by this swap-in request). 


If PVTFXC is greater than this threshold, a violation 
will occur if this request is honored. In this case, 
the threshold violation flag is set (SPCTFXH=1 and 
SPCTACT=1) and the user is posted. POST is rassed the 
following parameters: 


Register 10 - post code = Q. 
Register 11 - ECB address (from SPCTECER) 
Register 12 - TCB address (from PCBRTCB). 


Upon return, the rcot PCB is disposed of. 


If the threshold will not ke exceeded, the SCA/LSQA 
count is adjusted to reflect the number of LSQA rages 
being brought in for this request. 


The virtual address of the LSQA PFT is found by using 
the LSGA segment number (SPCTENTO) as an index tc the 
system STE for the LSQA segment. 


If the segment is valid (SGTPAM=0), the user either 
logged off or was abnormally terminated. In this 
case, LSQA STEs are invalidated and a PTIB instruction 
is issued (to prevent the hardware from giving un- 
wanted information). 


The real address of the PFT is extracted from the STE 
and IEAPTRV is called to return its virtual equivalent. 


If this is an LSQA-only swap-in (SPCTiST=1), SPCTNERL 
indicates the number of PCBs needed. If SPCT1ST=0, 
SPCTNBRT is used. 
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4 The Root PCB is pointed to by PCBRTP in the PCB on 
the swap queue for this request. 


5 If this is an LSCA-only swap request, Stages 3 and 4 
are marked complete (SPCT3CMP=1 and SPCT4CMP=1). 


The priority of Stage 1 pages is reduced by 1, 
if possible. 


oO 


=] 


The Stage 3 page-in count = SPCTNBRT-SPCTNBRL. 


© 


When the Stages complete, Page I/O Post will give 
control to the Root Exit routine pointed to Ly the 
PCBRGOTO field of the completing root (IEAPIN1 fcr 
the Stage 1 root and IFAPIN3 for the Stage 3 root). 
1 PCBs and table entries are set up as follows: 


® First, the LSQA PFIEs are zeroed except that 
PGTPVM=3 in each. 


e The XPT for this PGT is zeroed. 

e The page number (from SPCTVM) is multiplied ky 2 
and added to the PGT address to find the PTE. The 
XPTE address = the PTE address + 32 + 8*SPCTVM. 

e PGTPAM is set to 1 to indicate page assigned. 

e SPCTXPT (the XPT address) is moved to the XPTE. 

e XPTXAV is set to 1 to indicate page assigned. 

e If this is a warm-start page (SPCTFWST=1), 

XPTLPA is set tc 1 to indicate that the page 
cannot be destroyed. 


e The PCB is set as follows: 


e PCBNOQN=PCBALLOC to route the PCB to the real 
Storage allocation queue. 


e PCBIOI=1 to indicate page-in. 
e PCBRTP=the Root PCB address. 


e PCBFXC=1 to prevent the page from being paged out 
(by replacement) when the page is brought in. 


© PCBPTY=SPCTPTY. 

® PCBXPT=XPTE address calculated above. 
e PCBPTE=PTE address calculated above. 
® PCBVBN=SPCTVM. 

« The next PCB is accessed via PCBFQP. The next SPCT 
entry is found and this loop repeats for each PCB 
and entry. 

e When the last entry is completed, the swap fest 


flags (SPCTFL2, SPCTLERR, SPCTERR, SPCTFXH, 
SPCTOERR, SPCTTIHER) are zeroed. 


|ROUTINE | 
| NAME | LABEL 


ee ee a ee nn es sn ss ee nn ae ne se 


TLE 


SS ea ee eee eee 5 eae aera 5 maar as 
[ROUTINE | 
| NOTES | NAME | LABEL 
a a a i ae eee eee ena: Caremark 
The remaining PCBs are set ur from the remaining | | 
| (that is, non-LSQA) SPCT entries as follows: | | 
| | | 
| e PCBNON=PCBALLOC | | 
| | | 
| e PCBIOI=1 | | 
| I | 
| e PCBRTP=Stage 3 root address | | 
| | | 
| e PCBFXC=1 | | 
| | | 
| e PCBPTY=adjusted SPCTPTY | | 
| | | 
| e PCBXPT=address of a dummy 8-byte constant | | 
| with only XPTXAV=1 set | | 
| | | 
| e PCBDADDF=1 | | 
| | | 
| e PCBPTE=address of SPCTPTE of current SPCT entry | | 
| | | 
| e PCBVEN=SPCTVM | | 
| | | 
| e PCBDADD=SPCTXPT | { 
| [ | 
| SPCTPTE is set up to appear as an invalid, assigned | | 
| PTE. | | 
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4 pages must be swapped in, find the 
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Stage 4 Set-up 


Obtain one PCB for each needed swap-in. 


Reinitialize the Stage 1 root PCB for 
Stage 4 use. 
Initialize PCBs for Stage 4 page-ins. 


Initiate required page-ins. 


Find the swap-in count. 


Perform SMF accounting if necessary. 


(Continued at Step 8) 
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Diagram 5.38 (Steps 1-7) Swap-in Completion Routines for Stages 1, 3, and 4 
(Module IEAPSWAP) 
(ee Se aa Saas ee i Re emcee —T 
| |ROUTINE | 
| NOTES | NAME | LABEL 
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| 1 If PCBRFAIL=1, an I/O error occurred. 

2 The LSQA STEs in both the system and user SGTs are 
located by using the segment number in byte 0 of 
SPCTENTO as an index into each SGT. 

SPCA entries are loofed through as follows: 
® SPCAPTS*4 is used as an index into the SGTs. 
e The virtual address of the PFT is translated to a 


real address (via an LRA instruction) and stcred 
in SGTPTO. 


& 


For an LSQA-cnly request (SPCT1ST=1), SPCTNBRL is 
used for SMF accounting. 


If no Stage 4 pages are to be swapped in (SPCT4CT=0), 
Stage 4 is marked complete and the active swap-in 
count (SPCAACT) is used for SMF accounting. 

SPCT4CT contains the number of PCBs needed. 


The root address is passed by Page I/O Post. 


vu ao fb 


If TCBTCT=0, no SMF accounting is performed. 


e If this is the SWA segment, the user STF is vali- 
dated. Otherwise, it is invalidated. 


Pp] PCBs and takle entries are set up as follows: 
e SPCANTPT is used to index the appropriate SPCAPTA. 
e The virtual address of the PGT for this entry 
(SPCAPGTA) is picked up. 
SPCAPGTA*2+SPCANTVM = the PTE address for this 
SPCA entry. 
e The XPTE address = the PTE address + SPCANTXP. 


® PCBPTE is set to the calculated PTE address and 
PCBXPT to the calculated XPTE address. 


e PCBNON is set to PCBALLOC. 

e PCBVBN is set to SPCANTVM. 

e PCBIOI is set to 1. 

® PCBPTY is set to the adjusted priority (SPCTPTY). 


(SPCTPTY is adjusted by 1 to bias Stage 3 over 
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Diagram 5.38 (Steps 8-10) Swap-in Completion Routines for Stages 1, 3, and 4 
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| NOTES | NAME 
| -~------------------~--------------------------------------- t-------- $-------- 
| 8 Registers are saved for ROOTEXIT. {IEAPIN3 | 
| | | 
| If PCBRFAIL=1, an I/O error occurred for a Stage 3 | | 
page-in. 
110 Registers are saved for ROOTEXIT. {IEAPING | 
| | | 
| If PCBRFAIL=1, an I/O error was encountered during | | 
| Stage 4 page-in processing. [ | 
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Set up the PFTEs assigned to SPCT entries 
during the swap-in process: PFTE 


A. If an I/O error occurred, for each SPCT entry PFTWHOSE=0 
swapped in successfully PFIFXCT=0 


RARARARAAAERESRE BEREEEEdaaaaadaaan 
e Locate the PFTE and free the page 


frame. Translate Real 
pTTSO= 


IEAPTRV 
Find the virtual 


’ 
a 





PFTONAVQ=1 


address of the PFTE. 
5.47 





@ Route V=R intercepted page frames 


to a VER region. V=R Release 


IEAPVRS 
Allocate the page 


to a V=R region. 
Sob 





e Make non-V=R intercepted pages 
available. LABBRRARERRRERERRRREEEEEREEERR 


PFTE Enqueve 


IEAPRLS2 


WABBUBRRBRBRRB 


kc 













Add the PFTE to PVT 
the available queve. 
e When all entries have been i 5.17 em PV TSQACT-SPCTNBRL 
processed. . 3g 
MABARRBRRRERAEEEGEEGEEEgRGQGQQG GQ QZ 


3D All XPTEs for swapped - 
B. If the logon image function is requested, ueSe en 


mark all pages as not LPA assigned. LABBABA BRAS O62 Ea @a a Sasa aakaaaan eeepf xiao | 


(Continued at Step 3C) 


s Butbed :G uot jzdAaS 


uOTSTAI90qdn 


6TE 


ge el cP cere ey pe a a fe ga ee a la gg se Pee ewe peta ae i, es ee a ~“T 


C 


Diagram 5.39 (Steps 1-38) Swap-in Completion Subroutine (Module IEAPSWAP) 


| ROUTINE | 


NOTES | 


1 PCBRWK2 of the Stage 1 root foints to the SPCT for | 
this request. 


If SPCTSC3=1, the region is ready for Restore. 


For an LSQA-only request, SPCTNBRL is used as a loop 
counter. Otherwise, SPCTNBRT is used. 


3A If SPCTLERR=1, an I/O error occurred. 


e If SPCTFIS=1, this is an LSQGA entry. The PFTE is 
found by using SPCTVM. If this is not an LSQA 
entry, the PFTE is found by using PGTRSA of the 
dummy PTE. 


e PFTFXCT, PFITLSCA, PFTTSO, and PFIWHOSE are zeroed. 


e If the page has Leen marked not usable by RMS 
(PFTBADPG=1), nothing more is done to the page. 


e If the page is marked for V=R interception 
(PFTVRINT=1), it is given to V=R Release to re 
allocated to a pending V=R region request. 


e Otherwise, the page is made available via PFTE 
Enqueue and PFTONAVQ is set to 1. 


e When the last entry has been frocessed, PVISQACT 
is decremented by SPCTNBRL and SPCT1ST is set to 1. 


3B If SPCTLI=1, XPTLPA is reset for all pages swapped 
in as part of this request by indexing through the 
16 PTES per segment as defined in all SPCAPTAsS for 
the region. This allows the external back-uf group 
of Logon Image pages to Le freed at “STOP TSO” time. 


ee OS OO ew Oe ee OO ee Se 2 Be eS ee 
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ROOTEXIT 


LABEL 


OZE 


¢ Diagram 5.39 (Steps 3C-5) 
Swap-in Completion Subroutine 


Input Processing Output 


C. For each SPCA entry: PTE 


e Locate and put appropriate data in APSMABABBRABRAEEEER PTE=SPCT PTE 
the PTE and PFTE for this entry. INN AA 


SPCTFLS 


SPCTPTE Storage Keys 


e Route the PFTE to the hold queue. PFTE Enqueue Keys=XPTPROT 


PFTE 


PFTWHOSE=SPCTLTCB 
PFTFXCT=O0 


I 


PTE 
PGTRSA 
SPCA 
SPCAPTA 
SPCANTPT 
SPCANTVM 


4 TEAPRLS2 
Zax>(A) Add the PFTE to the 


3.17 


hold queue. 





PFTLSQA=1 


PFTTSO=1 

PFTQNDX=PFTHQN 
LAAN AN 

PFTHOLDQ=1 





D, When all entries have been processed, 


SPCTACMP inform the user of the action taken. | POST 


IEAQPTOT 


7 










| Post the specified ECB, 
SPCTIST 3.8 
SPCTLTCB sec 
| SPCTLTCB | | Indicate region is ready for restore. LBA Baa Qa eaaea aaaaaaa»aaaan \ SPCTSC3=1 
| Stage 4 Processing 
Lit4 If Stage 4 has not completed Caller 
Otherwise, indicate TSO action required, DRRRBRBRRRRREERERERE EERE SPCTSC3=0 


SPCTACT= 
5 Dequeue the Stage 4 root PCB and, if there soli 







was a Stage | |/O error free it. MBAs a ages 
ANNANAANS TWRBY 2001 PCB 
[0rd 
Add the PCB to the fos 
free queue, 





3.48 


Caller 


(Continued at Step 6) 
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3c0Cr @« The: PTE address for the current entry is found 
by indexing to SPCAPTA via SPCANTPT and adding 
the page number (from SPCANTVM) times 2. 


e If the page 


is not for LSOA (SPCTFLS=0), 


SPCTPTE (the dummy PTE) is moved into the 


real PTE. 


e PGTRSA is used to calculate the PFTE address 
for the page. PFTFXCT is then set to 0 and 


PFTWHOSE is 


e If the page 


set to SPCTLTCB. 


is for LSQA, PFTLSQA and PFTTSO 


are set to 1. If the fage is not for LSQA, 


the storage 


ud 
o 


The following 


Register 
Register 
Register 


keys are set from XPTPROT. 
parameters are passed to PCST: 
10 - post code = 0. 


11 - ECB address (from SPCTECB). 
12 - TCB address (from PCBRTCB). 


Upon return from POST, SPCTSC3 is set to 1 to 


indicate that 
processed. 


the Stage 1 and 3 rcots have been 


4 If SPCT4CMP=1, the swap-in is marked complete (SPCTSC4 
=1). If SPCTACT=0, SPCTSC3 is zeroed and SPCTACT is 


set to 1. 


re ms a a ee ee ee 
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Diagram 5.39 (Steps 3C-5) Swap-in Completion Subroutine (Module IEAPSWAP) 


A yg tn a eg eS pg ah as ee ge a Oe gen adage a, SSE ea Pee eae Moun ee: Mae te ote 1 
| ROUTINE | 


[NAME 


| 
LABEL | 
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Diagram 5.39 (Steps 6-7) 
Swap-in Completion Subroutine 
Input Processing Output 
SPCA 


SPCA4CT 6 if there was a Stage 4, post the swap-in as complete. POST 


IEAOPTO] 


Post the specified ECB, 















3.8 
PVT PVT 

PVTSTUFM 7 If the region must be migrated : CARRERE REERRREREREERRERRRRERRERY PVTSTLFM=0 
SPCT Initialize the root PCB to migrate this user. LBABARBREEEE BE BEER aaaanaaanhe Root PCB 





PC BRT P=SPCTLTCB 


SPCTLTCB 
Route the root PCB to the migration queue. Move PCB 
PCBNQN=PCBMIGR 


IEAPCBM 
Add the root PCB to 









TCB 


the indicated queue. 
TCBMIGR Otherwise, free the root PCB, 


5.48 Root PCB 








PCBNQN=PCBFREE 


Panwa >> (A) 
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Diagram 5.39 (Steps 6-7) Swap-in Completion Subroutine (Module IEAPSWAP) 


(oon a oe eae ee ee Se ae ee i rR —T 
| |ROUTINE | 
| NOTES | NAME | 
[aan nn nnn nnn nnn nnn t------- 
6 If the Stage 4 count (SPCA4CT) is not 0, a second |ROOTEXIT 


posting to indicate swap-in complete is required. 
Parameters are as above. 


| 
| 
7 The region must be migrated if the migrate select { 
flag is on (PVTSTUFM=1) and the region is not | 
migrated (TCBMIGR=0). | 

5 


| 
| 
| 
| 
| 
| 
| 
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pa a) | 


LABEL 
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e Diagram 5.40 (Steps 1-6) 
Swap-out Control Subroutine 


From Swap Control routine to 


Input handle processing of a Processing Output 


swap-out request 





SWAPOUT 
Root PCB 

PCBRWK] ee mem ee a ae i ee 1 Quiesce all activity for this task. 
|EAPT ERM 
Purge activity by 
region. 

— teas rs : area 5,57 
SPAT KLE SLL LSS SSL LSS 2 If this is a logon image swap, initialize 






the SPCA for the region, 


INiTSPCA 


Set up SPCA entries 
for each segment, 


Compile Swap 
Pages 


CMPLOUT 


Decide which pages 
are eligible to be 
swapped out. 


SPCTLTCB 


WABRRRARRRERREEEER 






SPCAFL1=0 

SPCAPGTA=LSQA PGT 
address 

SPCAPTS=LSQA 
segment number 


TCBLSQA 

TCBXTENT 

TCBST| 

TCBSTC 

TCBSWA 
SWAH 


SWAHPTR 
SPCAPGTA=PGT address 
SWAB for next segment 


SWABSEGX Ser 4 Obtain ee eee Sane SPCAPT S=segment number 
| ewappecauls me z of next segment 






I 
33 Build an SPCA entry for each page of 
Seep epee Pie the request either in real storage or 
part of the swap working set. 


SPCAPGTA=SWA PGT 


address 


SPCAPTS=SWA 


segment number 






5.42 


IEAPCBB SPCAEPTA=first SPCA 



















SPCAOAT ------4 entry address 
5.49 
5 Determine the tentative device 
address, DEVICES 
Assign device and 
group address, 
5.43 
Determine actual 
pages to be 
swapped out, 
5.43 
6 maa cee pege storage for pages Auxiliary Storage 
o be swapped out. Manager 


|[EAPAUXS 
Assign actual device 


addresses. 





5.63 
(Continued at Step 7) 
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Diagram 5.40 (Steps 1-6) Swap-out Control Subroutine (Module IEAPSWAP) 
yea ee a ee a eg ee ee ee 7 eo Ee a 


Register 0 - TCB address (from PCBRWK1). 
Register 1 - 8. 


The swap-out count (SPCAOAT) indicates the number or 
PCBs needeca. 


A PTLB instruction is issued kefore the call to the 
Auxiliary Storage Manager. Registers are set up to 
make it appear as if the call is from the Queue 
Scanner as follows: 


Register 1 - address of the first PCB. 
Register 3 - PVT address. 


INITSPCA initializes the SPCA PGT address entries by 
calculating segment numbers and PGT addresses for each 
segment in the region to be swapred out. Find Page 
(IEAPFP2) is called to give the virtual addresses 

of the PGTs. If SWAHPTR=0, there is no SWA regicn and 
the special second entry (see output akove) is not 

set up. 


| 
{ 


ROUTINE | 
NAME | LABEL 


Diagram 5.40 (Steps 7-12) 
Swap-out Control Subroutine 


Input Processing Output 


FILTER 


Move the assigned 
XPTEs into the PCBs. 


9ZE 


7 = Initialize PCBs for direct page-outs. 


WABABRRRRRRRRERRE TD 7 5, 
PCBDADD=XPTXADDR 
PCBDADDF=1 











PCB 
PCBXPT 
XPTE Ny ay na ee a ye ee Ty 


XPTXADDR 
XPTXAV 





PCBXPT=0 


8 Ifa swap-out for a logon image, indicate LPASET 
SPCAPTA pages in: LPA. Set LPA indicator 


SeCAPICE | | (i SSS SS SS SS Se where necessary. 
° SPCAPGTA 











VWABRRRRRRERRRRRRRBBED XPT Es with valid addresses 


in this region 


XPTLPA=1 


Q Set up SPCT for a future swap-in. SETSPCT 


SPCTLTCB 
i BERRRRERREEREREERERERBA SPCT 


TCBSTI SPCT 


TCBTCT SPCTWKST=SPCAACT 


TCT 
TCTPGOUT=TCTPGOUT 


+SPCAOCT 
—+10 Perform SMF and dispatcher-related 


statistics accounting. VURRBELCARBEEREREERELRRARREREERERERSRRRREED ee 
+ 


TCTRGNS=TCTRENS+1 


PVTSPSTI 
PVTSPSTC 


r—-—-———-4 


DSPSTI 
DSPSTC 


DSPSTI 
SPCAACT 


SPCAOCT 


SPCAPTCT ca 11 Invatidate the segments of the task to be 
eee swapped out. WABABWAREEEEEEERREREEESEEEEEEREEEEEEEEE Ay> All STEs for this 


region 


SGTPAM=1 
12 Initiate necessary page-outs. Move PCB 


IEAPCBM 
Add the PCBs to the 


DSPSTC 


SPCAPTSX4 





I/O initiation queve. 


5.48 
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Diagram 5.40 (Steps 7-12) Swap-out Control Subroutine (Module IEAPSWAP) 


ae eas Oe ep eg es ee eT eo go ae eee AO ep eT Cs —T 
[ROUTINE | 
| NOTES |NAME | 
a +-------- $-------- 
7 | SWAPOUT 
10 If TCBSTI=DSPSTI, DSPSTI and DSPSTC are zeroed. 


Nl tl ee el 


a a a ee 


moh, 
moh, 


—h 
i] 


The swap-out count (PVITSPOUT) is incremented by the 
number of pages to be swapped out for this request 
(SPCAOCT) . 


If TCBTCT=0, no SMF accounting is perfcrmed. 


SPACPTCT indicates how many STEsS must ke invalidated. 
SPCAPTS*4 is used as the index into the system and 
user SGTs. Entries are processed in reverse order so 
that LSQA entries are invalidated last. 


A PTLB instruction is issued before the call to Move 
PCB. PCBNON has been set to PCBINIT by the Auxiliary 
Storage Manager. 


FILTER moves the XPTEs actually assigned by the 
Auxiliary Storage Manager into the PCBs for the swar- 
out. The XPTE represented ky each PCB is picked up 
from PCBXPT. The external page address (XPTXACDR) is 
moved to PCBDADD, PCBDADDF is set to 1, PCEXPT is 
zeroed. 


LPASET sets the “do-not-destroy” flag (XPTLPA) in 
every XPTE with a valid address in the region to be 
Swapped out. The XPTE is found by adding 32 to the 
address of the PTE (located through SPCAPGTA). If 
XPTXAV=1 in the entry, XPTLPA is set to 1. 


SETSPCT loops through all SPCA entries setting neces- 
sary flags and counts in the SPCT to be used when the 
region is swapped in. 


1 SPCAAPT is loaded into an entry count register. 

2 The LSQA SPCT and SPCT entry counts are zeroed 

(SPCTNBRL and SPCTNBRT respectively). 
For each SPCT entry: 

SPCTVM is set to SPCANTVM. 

SPCANTSP is set to 1. 

The XPTE address is calculated ((SPCAPGTA+t2)*SPCANTVM 

+SPCANTXP). XPTXADDR is moved to SPCTXPT. 

If the PTE numker (SPCANTPT) = 0: 

e SPCTFLS is set to 1 to indicate an LSQA fage. 

e SPCTNBRL is incremented by 1. 

e SPCTFWST is set to 1 (if XPTLPA=1). 

7 SPCTNBRT is incremented by 1 and the “entry count 
register® (from above) is decremented by 1. 

8 If the “entry count register” # 0 or SPCTNERT # 16, 
repeat from "3" for the next SPCA and SPCT entries. 

9 When all entries have been handled, PVTISQACT is 
decremented Ey SPCTNBRL. 


We WwW 


n 


10 The residual SPCA count (all pages akove 16) is 


stored in SPCA4CT (Stage 4 page-in count) and 
SPCAF4A is set to point to the first Stage 4 entry. 


ce cr cr cs cr ce cc ce i ee i 


LPASET 


SETSPCT 
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Diagram 5.41 
Swap-out Completion Routine 


From Page I/O Post routine 
to perform swap-out root 
exit processing 


Input s Processing Output 


SPOUT 
Register ] 


Address of root PCB 1 Indicate swap-out status (I/O error—~if - ees 


any, swap-out complete, TSO action 


needed). LABRRRRRERERER' nr SPCTOERR=1 
SPCTOUT=1 


Root PCB 





Address of 2 Inform the requester of swap-out completion. POST SPCTACT=1 


JEAOPTOI 
Post the specified ECB. 


PCBRW K2-SPCT 


PCBRFAIL 





3.8 






SPCT 


SPCTECB 3 Dequeve and free the swap-out root PCB. RRRRRRREDERERRESEERRERER EE EEE EERE GE Root PCB 
wee PCBNQN=PCBFREE 


had the PS 


Add the root PCB to 





the free queve. 
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Diagram 5.41 Swap-out Completion Routine (Module IEAPSWAP) 


(sto ee a eee ee eo ea pe ee 5 ee a a fas ner — a 
| [ROUTINE | | 
| NOTES | NAME | LABEL | 
n= == 2 =~ = === === == =~ 55-52-22 = + = $$ 8 == $= === f= —+------ —f 
| 1 If PCBRFAIL=1, SPCTOERR is set to 1. |SROUT =| | 

| | | 
| 2 The ECB address from SPCTECB is passed to POST. | | | 
es ee a ee ae nS ee es ee peer ee nae ea 4 


O€€ 


From Swap-out Control routine 


to fill in SPCA entries 


Input Processing 
CMPLOUT 
SPCT 
SPCTAUX = 1 Initialize counters and pointers for loops 


and SPCA counts, 





Outer Loop (through SPCA entries) (eae PVT 
PVTTSOU=PVTTSOU- 
2 For the PGT pointed to by the first (next) SPCTAUX 
SPCA entry, set up for searching PTEs. 
SPCT 
a When all SPCA entries have been handled, 
PVT check for threshold violation. If one MABRRAERREREEEREEERE WRRRRERT, 
; 
zt 
PVTTSOU=PVTITSOU+ 
’ ‘opr nia 
Zann nanan en en nnnataannennnes SAH SPCT 
Caller 
Inner Loop (through PTEs) 
PTE 
3 if this page has not been assigned by GETMAIN, 
find the next PTE and repeat. 
When all 16 PTEs have been searched SSS 2 a D> SPCTAUX=SPCTAUXH | 
4 if there is an external page assigned BRR staaa aa aaaageaaaaaaaa PTE 
5 If the page is not valid WABBRRAATETRST EEE GEEGEEaaES TAS> 





If the page is not part of the swap working set, 
find the next PTE. 


(Continued at Step 5) 





Diagram 5.42 (Steps 1-5) 
Swap-out— CMPLOUT Subroutine 
(Deciding Which Pages 

Are to Be Swapped Out) 


Output 





SPCA 


SPCAACT=0 
SPCAOCT=0 














MABRRRRAREAEBEREEE ee 














PGTPVM=1 


PGTPAM=1 
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Diagram 5.42 (Steps 1-5) Swap-out - CMPLOUT Subroutine (Module IEAPSWAP) 


+ 

1  SPCA counts are zeroed and the count of external pages |CMPLOUT 
used by TSO (PVTTSOU) is decremented by the number 
previously used by this region. 


2 A PTE pointer is initialized from SPCAPGTA and 32 is 
added to it for the XPTE pointer. 


The new SPCT external storage count (SPCTAUX) is 
added to PVTTSOU to determine how may external pages 
TSO is now using. The amount available to TSO is 
calculated (PVITOTAX-PVTBATCM-—PVTTSBU). If PVTTSOU 
is greater than the result, the threshold has been 
violated. 


4 If an external page has been assigned (XPTXAV=1), 
SPCTAUX is incremented. 


§ If PGTPVM=1, the page is invalid. 
If XPTTAKE#1, no further action is taken. 
(XPTTAKE is set Ly IEAPTERM.) 


Pm ee ee ee ee ee ee eee 
i a et 


cee 


Processing 


5 sif the page is part of the swap 
(Con't) working set, fillin the SPCA RARBRRBRRBRRREAESREEERE EES 


entry for an "in-only" page, 


find the next PTE, > 3 y 
s 


y SPCANTVM (Byte 0) = 
Gxneew virtual block number 


6 _sif the page is valid: 


Dequeue its associated PFTE, PFTE Dequeuve 


y) IEAPRLS2 g 

enneg() ; 

; 

; 

4 

IFan LSQA page or it is referenced or PFTE v 
changed, fill the SPCA entry. WEA y 
, OS ; 

Hed he next Fe 3 | Y q 
; C 

Pannen SEHD SPCA y 

; C 

Annnnnnepunennneneneenenunel 


If not an LSQA page, or unreferenced 


and unchanged VER Release 


e Route V=R intercepted page 
frames to a V=R region. 


IEAPVRS 


to a V=R region 


5.11 


Ep 3 


e Make non-V=R intercepted 


pages available. LBWBBWAWAaAlleaSgeaaaaaaaaaa& 


PFTE Enqueue 


IEAPRLS2 
Add the PFTE to 


the available 
queue 





SalZ 


Allocate the page 





e Diagram 5.42 (Steps 5-6) 
Swap-out —CMPLOUT Subroutine 
(Deciding Which Pages 
Are to Be Swapped Out) 


Output 










XPTE 


XPTTAKE=0 


SPCA 
SPCANTG=1 






SPCANTVM (Byte 1) = 


page number 
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PFTE 


va PFTONAVQ=1 
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® Diagram 5.42 (Steps 5-6) Swap-out - CMPLOUT Subroutine (Mcdule IEAPSWAP) 


6S SS SS eee {=> => == TC 2a2-SS= 1 
| [ROUTINE | | 
| NOTES | NAME | LABEL | 
penne nnn nnn nnn nnn nnn nnn nn nnn nnn nn men nnn nnn nnn nnn ¢-------- $------ — 
15 ne ! | 
| 

| G@ For pages that are unreferenced and unchanged and not | | | 
LSQA pages: | | 
| If the page is marked for V=R interception (PFTIVRINT=1) | | | 
| it is given to V=R Release to he allocated to a pending | | | 
| V=R region request. | | | 
| | | | 
| Otherwise, the page is made available via PFTE Enqueue | | | 
| and PFTONAVQ is set to one. The PFTE is enqueued so | | | 
| that it will be taken first, since it cannot ke | | | 
| reclaimed. | | | 
De ee Na ee a eS i eee eae 2 aKa een J 
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Diagram 5.43 (Steps 1-3) 
Swap-out — External Address 
Assignment Subroutines 


From Swap-out Control routine (5.40) 
to assign devices and slots for page -outs 


SPCT 


SPCT DIRS 


PDT 


SPCA 


SPCAOCT 
| 


| 
L 


ccV 


as 





Processing Output 


DEVICES 







1 If the first (next) device specified by TSO is 
a fixed-head device: 







eee SAMY SOD Entries 


g | oreo 


e Fill the SOD entry appropriately, MMWARRRRRRREEERRERE' Teued io. 
e When all (4) specified devices have eee | ae aes) 


been handled 


Caller 
PDTE 


2 If the device specified by TSO is a movable-head device: eudcace 


e Calculate the best cylinder and starting group number. 


e Fill the SOD entry appropriately. DXDRARRRRRRRREREREEREREERERRRE QD SOD Entries 
a | 


3 If no devices were specified, chose a default: 


@ Find the secondary device with the largest number of 
available pages over the number of pages to be 
d out, 
swapped ou PDTE 


If none, find the primary device with the most pages address 


available, 


Fill the SOD entry approprictely, DRAWRBRARBABRRREERRERESEEEEREERER' Was SOD Entry 


Caller Same as one of the above, 
depending on type of 
default device 


(Continued at Step 4) 
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(Module IEAPSWAP) 
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e Diagram 5.43 (Steps 1-3) Swap-out - External Address Assignment Subroutines 


aa ca a a a , Sie asa 
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ROUTINE 
NAME 


}-~---------------------------------------------------------- $-------- 


* 


asa: 


ee ee 
N 


DEVICE initializes the SOD (a 32-Eyte internal work 
area) with up to 4 entries for a farallel swap or 
1 entry if the swap device is defaulted. 


SPCDIRS contains indexes for 1-4 devices or a 0, 
indicating default. 


Cylinders are scanned (through counts in the cCcV) for 
the cylinder closest to the current head location 
(using PDTLGN), with an available page count greater 
than the lesser of either the swap-out page count 


(SPCAOAT) or slots per cylinder - 5. If none is found, 


the closest cylinder with the highest availakle page 
count is selected. 


The end relative group number cf this cylinder = 
cylinder numker times groups per cylinder. 
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Diagram 5.43 (Steps 4-5) 
Swap-out— External Address 


From Swap-out Control Assignment Subroutines 
routine (5,40) to Fill in 
PCBs for page-outs 










Input Processing Output 
SORT aa 
4 lf the F ( ) PCB b é 
the first (next represents a page to be 
ERATE e If it is not an LSQA page WABRRRRBARRERRRRERE aUeeds 


SPCANTPT 
PCBRTP=root address 
SPCANTVM 


SPCAPGTA 


PCBDADDF=1 
PCBRBN=PGTRSA (saved) 













SPCANTXP 


e Initialize the PCB for the swap-out. ARBRA RARE BARBARA | 





> PCBDADD=SOD entry 


: e Increment the slot number. If it is now 
Change bit greater than the number of slots per group, 
obtain the next (or first) SOD entry. > 4 


PDTDEVT2 e When all PCBs have been handled BRRRAAA BAaABWaaeaaaaaaaasaasaaanaaaaaaa 


Root PCB 
PCBRG OTO=SROUT 
PCBRCNT=SPCAQOCT 


e Move the SOD information into the PCB. RRRRRRRRRRERR GG GE a 









> 


Caller 





5 if the SPCA entry is for a page not to be 
swapped out: MBBRRREAREBEEEEREERSEE EEG EEEE 


— e If the page is not usable a 4 
VER Release 


PFTBADPG —— e If the page is V=R intercepted IEAPVRS 


SPCAOCT=SPCAOCT-1 


SPCANTNG=] 


Allocate the page to 
a V=R region, 


4 3.11 


PFTE Enqueue 


e Make the page available. \EAPRLS2 
Add the PFTE to the 


PFTVRINT 





available queue. 


4 5.17 





WARBWAEAERAAEBEBEEBEEEEEEEREREEEE PFTE 
PFTQNDX=PFTAVQN 


PFTONAVQ=1 
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Diagram 5.43 (Steps 4-5) Swap-out - External Address Assignment Subroutines 


(Module IEAPSWAP) 


(SS a re a ee ee eo 6 CREE SS Sse -sS> 
[ROUTINE | 
| NOTES | NAME | LABEL 
a 5 ee fee 
| 4 The page is to be swapped out if it is not marked | SORT | 
| "in-only” (that is, if SPCANTNG=0) and: | | 
| | I 
e It is an LSQA page (SPCANTPT=0) or ! 
| e It is a changed page (change bit on) or | ! 
e It does not have a copy on external storage | 
| 
| (XPTAXAV=0) or | | 
I | | 
| e It presently exists on a movable-head device | | 
| (PDTDEVT2=1) . { | 
a a ee [eee a Genera a 


BEL 


Input 


Register 1 


First PCB on page |/O 
initiation queve 


PCB 


PCBXPT 


‘cen 


PVT 
PVT PDT 


PDT 
PDTIOB 
PDTLAST 


PDITSQCT 


PDITIOBP 
PCITACT 
PDITHSQA 


PDITMIOB | 
Sl, 








Entered by the Queue Scanner 
when PCB8s are found on the page 
I/O initiation queve and the queue 
is not suppressed 


Processing 


PCB Processing 
IEAPIOS 


1 Locate the next PCB to process, 


If none 


! 2 Build a channel program for this PCB, 


If there are no available CPQEs, suppress 
the page I/O initiation queue. 


3 Add the channel program to a slot 
queue. 


4 Move processed PCBs to the appropriate 
queue, 


Paging Device Processing 
5) Determine whether all of this device's 
slot queves are empty. 
If so, access the next device and repeat 
this step. If there are no more devices. 


G Issue an EXCP, if necessary. 


Get the next device, BE 5 


If none 


(Continued at Step 7) 












e Diagram 5.44 (Steps 1-6) 
Page I/O Supervisor 


Output 


Each PCB with its Skip 
Flag on 


PCBNQN=PCBTSK PQ 
WBA BRSEEEBEEREEESE) 


PCBIOCMP=1 


QSEARCH 


Find a PCB that 






can be processed, 


CHPGBLD 


Page |/O Initiation Scan 
Table Entry 


BWWERERERE EERE EERE! 


Build a CPQE. 
5 45 


AqRrnereVWVUBUABRRBBEEne 


ADDTOSQ 





Put the CPQE on the 


appropriate slot queue, 


IEAPCBM 
Put PCBs on the 


appropriate queue, 


5.48 





Caller 


Caller >. ——____—_ 
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eDiagram 5.44 (Steps 1-6) Page I/O Supervisor (Module IEAPIOS) 
Fa See ee a ee ee ee eee ee y (ieee aejetengen: an “jo =2- so 
| {ROUTINE | 
| NOTES | NAME | LABEL 


1 | LEAPIOS 


2 The XPTE and PCB addresses are passed to CHPGBLD. If 
the PCB is marked for directed page-out (PCBDADDF=1), 
the XPTE address that is passed is actually the address 
of PCBDADD. 


4 This step completes PCB processing. The paging devices 
are handled next. 
PDITLOOP 
The EXCPs are issued by using the EXCPVR macro TESTEXCP 
instruction. PDITXCP is set by STARTUP. 
1 | The QSEARCH subroutine searches the page I/O initiation |QSEARCH 
queue for the first (next) PCB with the “skipg™ flag cff 
(PCBSKIP=0). It returns the address of this PCB in 
register 1. If no PCBs are usable, a zero is returned. 
Each PCB with the “skip"™ flag on is marked I/O complete 
and is routed to the task post queue. 


eee Se een a ee nn ne en ee Os eS 


-— — ee ee 


One 


Input 
PDITEs 
------- 
! 
PDITHSQA a a 


PDTLAST 


Entered by Channel! 
End Appendage 


Register 2 


Address of 

interrupting IOB = _—_— — — — 
PDITE 

PDITINDX 


PDITACT 


Entered by IEAPALOC 
when a PCB represents 
a page-in from an 
active device 


-—--- 
Register |] | 
Address of PCB 


CB eee 


PCBDADDF 
PCBDADD 





PCBXPT 








Processing 


¢ Diagram 5.44 (Steps 7-12) 
Page I/O Supervisor 


Single Exposure 


7 Attempt to start the device if it is not 
active, 


If STARTUP failed, get the next device. 


{f there are no more devices 


STARTUP 


Prepare to start an 
inactive |OB by 
chaining a CPQE to it. 










> 5 


Caller 


8 if STARTUP was successful! or if the device was active originally, 


append other channel programs to the IOB, 


JEAPIOS2 


APPENDIT 


Chain the CPQEs 
to the IOB. 





Q When the entry is from the Channel End Appendage, 


attempt to start the inactive device. 


If STARTUP fails 


10. If STARTUP was successful attempt to add more 
channel programs to the IOB. 
IEAPIOS3 


11. Attempt to build a new channel program. 


If CHPGBLD is unsuccessful 


12. Add the channel program to the slot queve. 








STARTUP 


Activate the 
indicated JOB, 










5.45 


Cailer 


APPENDIT 


Add more CPQEs to 


the indicated IOB, 
5.45 


Caller 


CHPGBLD 


Initialize a CPQE. 
5,45 








Caller 





ADDTOSQ 
Put the CPQE on the 


slot queue. 


5.45 


| APPENDIT 


Add more CPQEs to 


the indicated IOB, 
5,45 


Caller 


Cc 
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eDiagram 5.44 (Steps 7-12) Page I/O Supervisor (Module IEAFICS) 


Raa a la aa a a mn a {==-=---> {7 SHHS=S= 
JROUTINE | 
NOTES | NAME | LABEL 
ee ae aaa ah ead oo ea ie Con Re +===-=-== 
7 |IEAPIOS | MLTXP2 
| | 
Q The PDITE address is the input IOB address. | LEAPIOS2 | 
| | 
To minimize rotational delay, the slot queve chosen for | | 
STARTUP is the next sequential slot queue of the next | | 
sequential slot queue of the last active channel | | 
program's slot queue. | | 
| | 
11 The PCB passed needs I/O initiation and the device that |IEAPIOS3| 
it requires is active. | | 
| | 
If the device is active on the same cylinder as this | | 
request, the Page I/C Supervisor calls APPENIIT. | | 
| | 
The XPTE is located as in IEAPIOS, Note 2. | | 
SE eA Bate ne oe ett ee a re et ee Bs ets 
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Diagram 5.45 (Steps 1-7) 
Page i[/O Supervisor — 
Subroutines for Building and 
Queuing Channel Programs 


From Page I/O Supervisor 
to build a new channel 


Input rere Processing 












































Ragiiters CHPGBLD Output 
Address of PCB XPTDEV a ea Locate the PDTE and determine whether any 
channel programs can be built. If not 
Address of XPTE XPTSLOT eae loans Register 15 
PVT XPTGROUP | | KyRURRURRRRRRRERERRETED 
PVTPDT | |_ _— 2 Indicate that this CPQE is being used and PCB 
SSS SS —- | route the PCB to the I/O active queue. 
PVTCHPGQ { PCBN@ N=PCBACT 





CPQE 
sus || 


PDTE 


PDTIOB 
PDTGC 


Calculate the slot queue address and 
determine the target cylinder for the 
paging operation. 





CPQPCBAD 
CPQUNAV=1 
CPQCCHH=target cylinder 


CPQSSNOP=op code 
CPQADSS=SQ SECNO 





Initialize the CPQE, 








CPQRWAD=real address 









PDTTG CPQRWOP=op code 
PDTBA CPQ NPTCA=0 


CPQTCBR=PCBPTY 
PCI flag=0 


PDITISQA 
PDITSSDV 


SQHHDEL 
SQSECNO 







From Page I/O Supervisor . 
Input to add a CPQE to a slot queue Processing 


: ADDTOSQ 
Registers 


Address of CPQE 5 Determine whether the slot queue is empty. SQICHPGA 
If so, add the CPQE immediately. 
Address of slot queue SQLCHPGA 
Address of base PDITE 6 > SQCHPGNO=SQCHPGNO+1 





Determine where the CPQE is to be placed 
SQE on the slot queue and add it there, 


SQCHPGNO 


PDITE eon 7 = Indicate which slot queue is to be FABRA BRBRRRERREERERREU, 
| searched first (whichever has the é p 
PDITMHDV | 


most on it). 


CPQSQFPT 
CPQSQBPT 


PDITSQCT 


PDITHSQA=this slot 
(Continued at Step 8) queue number 





PDITSQCT=SQCHPGNO 
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eDiagram 5.45 (Steps 1-7) Page I/O Supervisor - Sukroutines for Building and 


We ee es GON FE Tee mam ey Gee Te) eee ie me ee Pe Wee oie ot pe BD rane aaa a 


Queuing Channel Programs (Module IEAPIOS) 


a 
8 
tt 
nn 


eee: FP oe ees nnn nnn ann nn aes sn eS Oe 


|RCUTINE | 
|NAME [LABEL | 


NO 


OO 


& 


un 


The PDTE address = [ (XPTDEV-1) #32]+PVTPDT. 

The CPQEs are searched, starting from the last CPQE 
used, for the first availakle one (CPQUNAV=0). The 
CPQE address is incremented by 64 to find the next 
CPCE. 

The correct slot queue address = PDIT1SQA+[(XPTSLOT-1) 
#16]. 


The target CCHH is calculated as follows: 
XPTGROUP 
CCCELTA = PDTGC . 
CCDELTA-1. 
HHDELTA = XPTGROUP-[ (CCDELTA*PDTGC) +1] ¢PDTTG. 
CCDELTA is comkined with HHDELTA and the fcur HHDELTA 
bits in SQRECNO are added to the combination. 
The final CCHHRDELTA + PDTEA = the target CCHER. 


If the remainder = 0, CCDELTA = 


When the device characteristics include rotational 
sensing (PDITSSDV=1), the set sector operation code 
and sector must be placed in the CPQE. 


If the PCB is for a page-in (PCBIOI=1), the read data 
operation code is placed in CPQRWOP and the count of 
page-ins (PVTNPIN) iS incremented (for SMF purroses). 
If the PCB is for a page-out (PCBIOI=0), the write data 
operation code is placed in CPQRWOP and the fage-out 
count (PVTNPOUT) is incremented. 


If the slot queve is empty (SQCHPGNO=0), none of the 
criteria for CPQF placement have to be considered. 


The first and last CPQF pointers (SQiICHPGA and SCLCHFGA 
respectively) are set to the input CPQE address. The 
forward and Ltackward CPQE pointers (CPQSQFPT and 
CPQSQBPT respectively) are set to zero. The CPQE count 
is incremented (SQCHPGNO = SQCHPGNO+1). 
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CHPGBLD |CPAVTEST 


CPAVAIL 


MULTCCD 


ADDTOSQ 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
ALLDEV | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
WASEMPTY | 
| 

| 

| 

| 

| 

| 

| 


hm a a ee SS ee 
a i a a ee 


C 


PoP Sse See Sa ee ee Se SS Sree eg ee ee ae oe ee Toe Ves pe ef 1 


6 For movable-head devices (PDITMHDV=1), the placement of 


the new CPQE on the slot queue is determined: 
1. By cylinder order (low to high). 


2. By priority (high to low within cylinder 
groups). 


3. By read over write (within cylinder groups of 
the same priority). 


4. FIFO (when the other 3 are equal). 


For fixed-head devices (PDITMHDV=0), only 2-4 are 
considered. 


To add the CPQE to the slot queue, the first (SQICHPGA) 
or last (SQLCHPGA) pointer is changed to the new CPQE 
address if necessary. The forward (CPQSQFPT) and back- 
ward (CPQSQBPT) of beth this CPQE and its previous and 
next CPQEs are changed appropriately. The CPQE count 
(SQCHPGNO) is incremented by 1. 


If the count of CPQES on this slot queuve (SQCHPGNO) is 
greater than the previously high count (PDITSOQCT), the 
"high slot queue address" (PLITHSQA) is set to this 
slot queue address and the high count is updated to 
reflect the new high (PDITSQCT=SQCHPGNO). If SQCHPGNO 
is smaller than PDITSQCT, no changes are made. 


[ROUTINE | | 
| NAME |LABEL | 


SRCHLOOP 


+ 
| 
| 
{ 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| UPCOUNT 
| 

| 

| 

| 

| 
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e Diagram 5.45 (Steps 8-13) 
Page I/O Supervisor — 
Subroutines for Building and 
Queuing Channel Programs 


From Page |/O Supervisor 
Input to append a channel 


program to an active IOB Processing Output 










APPENDIT 





8 Calculate the last used slot queue number 
and search the next sequential one for a 


usable CPQE, If one is found > 2 


Search the secondary slot queue of the last 
slot queue searched for a usable CPQE. If 


one is found > 12 


10 If not found, continue search using the 
secondary slot queue of the last slot queue 


searched until found. SaaS 12 


If all slot queues are empty 



























CPQE (last active) 


CPQSINDX amet 










Register 15 


Return code 


SQCTUPDT 


Update the "highest 
count" pointer in the 


PDITE. 1 









7 
Oo 
4 
m 
















PDITHSQA 
PDITSQCT 





12 Dequeue the CPQE from its slot queve. 


DECHPG 


Remove the CPQE, 
5.45, Step 17 









If this CPQE cannot be used and the slot 


queues are now empty a || 


If this CPQE cannot be used and there 
are more on the slot queues, continue 
searching the same slot queue. 








CPQSSNOP 
CPQSPCHA=CPQCCHH 
CPQTCBPR=SQRECNO 
CPQSEEK A(BB)=0 
CPQCPPTR=Previous 
CPQE address 
CPQRWFLG (See note) 
CPQ NPTCA=new 

CPQE address 
CPQNPTCD 



























43 Add the CPQE to the active chain, 





SS 9 







Previous 


CPQE 










=TIC op code 






(Continued at Step 14) 
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e Diagram 5.45 (Steps 8-13) Page I/O Supervisor - Subroutines for Building and 


Queuing Channel Programs (Module IEAPICS) 


[rr ee a gp eS Sagres Fry pe es ey a, at ) Esra a Seo ae e Ss 1 

| | ROUTINE | { 

| NOTES | NAME | LABEL | 

}------------~---------------------------- ----- -------- +--+ f+ +4 +--+ 
8 The last-used slot queue address = (CPQSINDX*16)+ | APPENDIT| START 


PDIT1S@A. 


If the device is movakle head (PDITMHDV=1), the cylinder 


numbers of the last active channel program and the CPQE 
being tested must ke equal in order for the CPQE to Le 
usable. 


If LACP cC is higher, keep searching this slot queue. 
If LACP CC is lower, stop searching this slot queue. 


For moveable-head files, CPQEs are selected only if 
they are for the same cylinder. 


The new CPQE is always added to the end of the active 
queue. 


SQCTUPDT compares the count of CPQEs on each slot queue 
(SQCHPGNO) for this device with the high count 
(PDITSQCT). If a slct queue is found with a higher 
CPQE count, PDITSQCT is set equal to that count and 
PDITHSQA is set to that slot queue number. If either 
PDITHSQA was zero before the search, or PDITSQCT is 
zero at the end of the search, a return code of 7 is 
returned to the caller to indicate that all slct queues 
for this device are empty. Otherwise, a return code of 
0 is given to indicate that more CPQEs exist. 


TPRIM 


APPENDIT|DUAPPEND 


| 

| 

| 

| 

| 

| 

| 

| 

i 

| 

| 

| 

| | 
| | 
| | RCO 
| 

| 
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| 
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¢ Diagram 5.45 (Steps 14-20; 
Page I/O Supervisor — 
Fram Page 170 Supenitar Subroutines for Building and 
to start an inactive device Queuing Channel Programs 





Input Processing Output 




























Register 15 
cm _ jes pryuapeanp {ius 
CPQSFPT Address of base PDITE ey >) es 
CPQCCHH Inactive exposure's 14 Determine whether the device is a fixed-head p 4g PDTE 
CPQPCBAD 1OB address or movable-head device and find the proper y g PDTLGN 2 
Address of slot queue CPQE. é g CPOE 
15 Dequeve the channel program from its slot V Y CPQSEEKA(BB)=0 
veve. 
PCBDADD ‘ Remove whe CrQe gs (CCHH)=CPQCCHH 
from the slot p ¢ = 
PCBXPT SQE sees y) y (Record)=SQRECNO 
PCBGROUP SQSCSQA (Digaammed below) y é CPQCPPTR-O 
si SQICHPGA g 1OB 
SQRECNO If the CPQE cannot be used but more exist > | 4 gp IOBST RT=first CCW in 
EeTep! y CPQE address 
PDITE If the CPQE cannot be used and the slot é 
2 | 4 IOBSEEK=CPQSEEKA 


PDITSQCT queues for this device are all empty WRBABRESESERESRESE RE GE EES 


PDITMHDV 


XPTE 


PDITE 


PDITLACP=new CPQE address 









16 Chain the channel! program to the !OB and PDITXCP=1 
RETCRONE indicate that an EXCP is needed (if PDITACT=1 
necessary). Caller 
From APPENDIT or STARTUP 
to remove a CPQE froma - 
Input slot queue Processing Output 





Registers 


CPQE to be dequeved 
CPQE's Slot Queue 
Address of base PDITE 


PDITHSQA 
SQE 
SQINDX 
CPQSQF PT 


CPQSQBPT 
CPQPCBAD 


PCB 
PCBSKIP 


DECHPG 
SQCHPGNO=SQCHPGNO -1 
SQLCHPGA 
Dequeve the CPQE and indicate the change SQICHPGA 
in the slot queue, 
PDITE 


If the PCB should not be skipped BRRRBeSeSSE SE EE" PDITSQCT=PDITSQCT-1 


Dequeved CPQE 


Make the dequeued CPQE available and CPQSINDX=SQINDX 
route the PCB. CPQUNAV=0 


Previous CPQE 
CPQSQFPT 
Update slot queue count information. SQCTUPDT 





Update slot queue 
counts In the 





CPQSQBPT. SQBPT 


PDITE. 


Register 15 


SAAN [Return codeO, code=0 
PCB 
PCBNQN=PCBTSK PQ 
PCBIOCMP=1 


Register 15 


VY) 
ANNAAANARBARABARARARARRRABRBA Reco 


PRBAWaAaaaa 
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Caller 
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Diagram 5.45 (Steps 14-20) Page I/O Supervisor - Subrcutines 


Queuing Channel Programs (Module IEAPIOS) 


C 


for Building and 


a a a da ra a TS 


For a movable-head device, the CPCE with the closest 

cc to the last cylinder used (IOBCC) is used. All slot 
queues are searched in secondary sequence and the CPQE 
with the smallest aksolute difference ketween its CC 
and IOBCC is used. The search ends immediately if a 
match is found. 


For a fixed-head device, the first non-empty slot 
queue's first CPQE is used. The slot queues are 
searched in secondary sequence. 


A return code of 7 (which means no CPQE could be used 
and the slot queues are empty) is returned tc the 
caller. 


An EXCP is needed if the caller is the Queue Scanner. 
A return code of 0 (a CPQE was chained) is returned to 
the caller. 


The first and last pointers of the SQE are updated if 
necessary and the forward and backward pointers cf the 
previous and next CPQEs respectively are changed if 
necessary to reflect this CPCE's removal. If this 
Slot queue has the highest CPQE count (PDITHSQA=this 
SQE), the high count (PDITSQCT) is decremented. 


If PCBSKIP=0, this CPQE may ke appended. 


A 0 return code from SQCTUPDT (all slot queues encty) 


is changed to a 4; a 7 return code (CPQEs remain on slot 


queues) is left alone. 


For a movable-head device (PDITMHDV=1), extra records 
must be kept for better future auxiliary storage 
assignment. For a directed fpage-out (PCBDALIF=1), the 
XPTE is located by PCEBLCADD. The PDTE address = 
((XPTDEV-1)*32]+PVTPDT. PDTIGN is then set to 
XPTGROUP. If PCBDADCF=-0, the PDTE is located by PCEBDEV 
(rather than XPTDEV) in the above equation. PDTIGN is 
then set to PCBGROUP. 


= 
[ROUTINE | 


_——— a a ee ee ee 


NAME 


STARTUP 


DECHPG 


S030 


DECHPG 


SKIPON 


se ee ee ee ee 


8he 





Input 





Entered by Program FLIH to 
handle processing or relocation 


exceptions (interruption code 17) Processing 


CVT 


Main Storage 
Locations 144-147 


Relocation address es 


PTE | 


r 
PGTPVM 
PGTPAM 


CVT 


IEATCB | 


CB 


c 
| 
. 
TCBDSP | l 
TCBRBP | 
TCBTCT : 
| 
| 
I 

WL 





CVTPVTP acne 


— ee el 


IEAPIX 


1. Obtain askeletal PCB. 


f 


2 Determine whether an error exists. 


5 


If the Find Page routine fails or if the 
paging exception should not have 
occured (page valid) 


3 if the virtual page has not been assigned 
by GETMAIN, dispose of the PCB. 


9 

4 

YNNN\\ 
and 
Return 
Code 


4 Allocate a real storage page for the 


missing vital page. 


J 
Zannp(0) 


5 Whena page was reclaimed, or if this is 
a first-time reference, dispose of the PCB. 


VN 


eee Return 


Code 


6 Whena page-in is required and new work 


is generated for the paging task, place the 
PCB on the appropriate queue. 


7 When no new work has been generated (the 
PCB was related to an already active PCB), 


or upon return from the Move PCB routine, 
indicate a task switch if necessary, set the 
requester to page wait status, and perform 
SMF accounting if possible. 


Cc 


Build PCB 


IEAPCBB 
Get an empty PCB. 





5.49 


|EAPFP 
Locate the PTE and 
XPTE for this PCB, 
5.27 


IEAPSER 


Place the system in 
a disabled wait state. 


5.54 


Move PCB 


IEAPCBM 
Place the PCB on 









the free queue. 





5.48 


Real Storage Allocation 
IEAPALOC 


Allocate a page. 









5.6 


Move PCB 


IEAPCBM 
Place the PCB on 


4 Le 


the free queue. 


5.48 


Move PCB 


IEAPCBM 
Add the PCB to the 


indicated queue. 


5.48 








Caller 


Caller 
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Caller 


e Diagram 5.46 
Program Check Interruption Extension 


Output 


CVT 
CVTPSIC=1 


PVT 


PVTPCPIX=1 










PCB 
PCBNGQN=PCBFREE 










IEATCB 


NEW=0 (Task Switch) 


RB 


RBW CF=RBWCF+1 


TCT 


J 
s 

y Register 15 
AN 
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eDiagram 5.46 Program Check Interruption Extension (Module IEAPIX) 


ss 


| 
| NOTES 


2 


— ce i 


If the return code from the Find Page routine is 4, the 
Virtual segment in question does not exist. If it is 8, 
an internal error has been detected. In either case, 

control is passed to IEAPSER with an error code of 700. 


If the page is valid (PGTPVM=0), a logical error 
exists and control is passed to IEAPSER with a cede of 
701. 


If the virtual page is unassigned (PGTPAM=-0), the XPTE 
pointer is zeroed and the PCE is routed to the free 
queue (PCBNOQN=PCEFREE). Exit is made to the caller 
with a return code of 8 (see Note 3). 


If the system lock (CVTSYIK) is on and its fointer 
(CVTSYLID) equals OLL, the PCB is marked as represent-— 
ing a disabled page fault (PCBDCF=1) and the pricrity 
(PCBPTY) is set to X'FF*. Otherwise, PCBPTY=TCBDSP. 


For the “reclaimed/content insensitive" case (IEAPALOC 
return code is zero), the PCE is disposed of (PCENQN 
was set to PCBFREE by IEAPALOC). Control is returned 
to the caller with a return code of 4 (see Note 3). 


When new work is generated (IEAPALOC return code equals 
either 4 or 8), the PCB representing the work is moved 
to the queue indicated by PCBNON (set by IEAPALOC). 
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[ROUTINE | 
| NAME 


|IEAPIX |GOPIX 
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| [ROUTINE | 
| NOTES | NAME | 
p-------- --------~----------- <== == =~ 5 nnn neni nn nnn nnn {------- 
| 7 If NEW=OLD, task switch is indicated (NEW is set to | | 
| zero). | | 
[ | 
If TCBTCT=0, SMF accounting cannot he rferforred. | | 
| Control is returned with a return code of 0 (see Note | | 
| 3). | | 
| | | 
| 1 IEAPIX turns on the paging-supervisor-in-control flag | | 
| (CVTPGSIC) and the "PIX in control bit" in the PVT at | | 
| entry. Both are turned off before all exits. | | 
| | | 
| P] The relocation address is the virtual storage address | | 
| that was found to ke unavailable during dynamic address | | 
| translation. Its format is [ 00 ) AB J) CC J] EF Jj) | | 
| The virtual block number is ABCO. | | 
| | 
! E} Return Code Meaning | | 
| 0 The current task cannot be dis-— | | 
| patched; either the paging task will | 
| be in control or a task switch is | | 
| necessary, and the current task is | | 
{ in page wait. | | 
| | | 
| 4 The current task is dispatchakle; a _ | | 
| real storage page has been assigned | | 
| and the task is ready. | | 
| [ | 
| 8 No page has been assigned because a_ | | 
| logical addressing or protection | | 
| exception has been detected. | | 
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Diagram 5.47 

Real to Virtual Address 
From ERPs, RMS, and Paging Supervisor Translation Routine 
routines to convert hardware -supplied 
real addresses back to virtual addresses 
so their areas can be addressed while 


dynamic address translation is in effect Processing Output 









Input 





IEAPTRV 






Register | 


Virtual address=Real address 


Register 15 
Return code=0 


Register | 


oe Real address 








1 Calculate the PFT slot number and determine 
whether the input address describes part of the 


nucleus, If it does Oo —— 














PVTF PFN 





PVTLPFN 2 If the input address is above the bounds of real Register 15 
PVTFPTP storage RRWBBWAEAAAAAVeQAse ae 






Register 15 





3 Locate the PFTE and determine whether it is on 
he Galidlle moeqieiea na: RR ee 





PFTE 







PFTONAV@Q 
PFTVBN 






Calculate and verify the virtual address (ensure 












ie nes Register 15 
that the page is in real storage). If it is not 
ri mpi] 







Register | 


Virtual address 


Register 15 
Return code=0 






If it is valid 








Return to the caller 
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Diagram 5.47 Real to Virtual Address Translation Routine (Module IEAPTRV) 
CSS SSS tS ee eS ee een Oe ee ee ts. oS 4 


{ 
| NOTES | 


1 The PFT slot number is derived ty multiplying the high 
order 12 bits of the input address by 16. If the FFT 
Slot number is -less than PVTFPFN, the storage it 
describes is in the nucleus. 


2 If the PFT slot number is greater than PVTLPFN, the 
storage it refers to is above the bounds of real 
storage. 


| 

| 

| 

| 

| 

| 

| 

| 

{ 3 The PFTE is located by adding the PFT slot numker to 

| the PFT origin (PFTFPTP). If PFTONAVQ=0, the address is 
| translated. 

| 

| 4 The virtual address is calculated as follows: 

| 
| 
| 
| 
| 
| 
| 
| 
| 


The high-order 12 bits of PFIVBN are placed in 
bits 8-19 of the output address. 


The low-order 12 bits of the input address are placed 
in the low-order 12 bits of the output address. 


The result is checked with a Load Real Address 
instruction. 
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Diagram 5.48 
Move PCB Routine 


Entered by various routines 


Input to add PCBs to a queue or to 
move them from one queve P 
Register 1 (Add) to another* Processing 


| 00 | Address of PCB 


Register 1 (Move) 


IEAPCBM 
eal 
number | 1 Save registers on the appropriate save area, 
PCB | 
PCBFQP 
2 
PCBBQP 
PCBNQN 
PC BCQN 


When called to add a PCB chain to a queue, FAARBAABAAAEAARRRABRAE MRRRRRALY 
place the specified PCBs on the indicated queve. 







Add the PCB to 
the queue. 






Output 


5.52 





Caller 


WABBaBaaea ea 


VN 


9 3 = When called to move PCBs from a specified queue LA Registeh 1s 
VT to another queue, scan the specified queue and ZoSeSessesesssessers VA N\AN NANA NAS ERP] Return code-0 | 


P 
PVTSCAN Hi eet PCB that should be moved to the 
Scan Table Entry Ne AEH OFF 


SCNEFST Remove the PCB 


from its current queve. 


Dye 52 












Add the PCB to the 
next queve,. 


SoZ 


Caller 
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Diagram 5.46& Move PCB Routine (Module IEAPCB) 


GPEC FF) neh teh ae FE ee ee Oe ay SY NT ny ye ET TR ee ge epg en gens a Wenn pe St 1 i ae 


* Called by Program Interrupt Extension, Page Services 
Interface, Swap, and certain gueue processors to add 
PCRs to a PCB queue. 


Called by Queue Scanner, Page I/O Post, and the Page 
I/O supervisor, appendages, etc., to move PCEs from cne 
queue to another. 


aah 


Since Move PCB may be entered enakled or disabled, it 
must have two separate save areas. Upon entry, a 
switch is tested and if off, it is turned on and 
registers are saved in the disabled save area. An 
indicator is kept to show from which save area 
registers are to be restored. The switch is turned off 
when registers are restored from the enakled save area. 


Pointers to the first and last PCB on the chain are 
passed to ONQ. 


i) 


The PCB queve header for the indicated queue is calcu- 
lated as follows: 


PVTSCAN + 12*(input gueue number-1). 


PVTSCAN is the beginning of the scan table. 
12 is the length of a scan table entry. 


If the PCB's next queue number (PCBNON) is equal to the 
current gueue number (PCBCOQN), it is not moved. If 
they are not equal, the PCB is moved to the queue 
indicated Ey PCBNON. OFFOQ and ONQ are called for each 
PCB moved. 
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Called by any Paging 
Supervisor routine to 
get PCB-size storage 


blocks 






Input 


Register 1 


PVTSCAN 


Scan Table Entry 


SCNLST 


PCB (each one searched) 


PVT 


PVTBGMS 










Processing 


IEAPCBB 


1 


Save registers on the appropriate save area, 


When the request can be satisfied from the free 


queue, take the needed number of PCBs from 
that queue, 


If more PCBs than were available on the free 


fl 









Remove the PCBs 


from the free queue. 


Ve a aia WRBREEBREE ZB 


NAAN NAAN AANA 


queve are needed, get storage for the required MRWABRRBRRRERREREREEEEERREEEE EERO Es 


| GETMAIN. | N 


Allocate requested 


number of PCBs initialize them, and place 
them on the free queue. 


lf GETMAIN cannot be 
called wennp(A) 









Caller 


Place the new PCBs 


on the free queue. 





storage from SQA, 








Diagram 5.49 
Build PCB Routine 


Register 1 


Address of first PCB 
gotten from free queue. 


Register 15 


PCBs 


All fields zero except: 


PCBFQP ) | 
PCBBQP > in new 


PCBCQN | PCBs 


Register 15 
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Diagram 5.49 Build PCB Routine (Module IEAPCB) 


a ee ph rN ey I A Fae el 
| NOTES 
}------------_---+--+----------------------------------------- 
|.1 Since Build PCB may ke entered enabled or disabled, 

| it must have two separate save areas. Upon entry, a 

| switch is tested and if off, it is turned on and 

| registers are saved in the disabled save area. An 

| indicator is kept to show from which save area 

| registers are to be restored. The switch is turned 

| off when registers are restored from the enakled 

| save area. 

| 

| 2 The PCB queue header tor the indicated queue is 

| calculated as follows: 

| 

| PVTSCAN + 12*(input queue number-1). 

| 

| PVTSCAN is the beginning of the scan table. 

| 12 is the length of a scan table entry. 

| 

| The free queue is scanned starting from the last PCB 

| and following the kack pointers (PCBBQP). 

| 

| Pointers to the Nth PCB and the last PCB on the free 

| queue are passed to OFFQ. 

| 

| 3 If the GETMAIN recursion switch is on (PVTBGMNS=1), 

| GETMAIN cannot be called to get the storage required 

| and control is returned to the caller. Otherwise, 

| GETMAIN is requested to allocate enough storage for 

| N-(number of PCBs on the free queue) PCBs. 

| 

| Pointers to the beginning and end of the newly initial- 
| ized PCB chain are passed to ONQ. 
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¢ Diagram 5.50 
Relate PCB Routine 
Entered by IEAPALOC to 
logically associate one 


PCB with another Processing 









Output 


IEAPCBR 






Input 


PCBI1 or last PCB 
related to PCB1 


PCBRLP=address of PCB2 


Note: The PCB pointed to by register 2 (PCB2) 
is to be associated with the PCB pointed 
to by register 1 (PCBI), 





Register 2 


Address of PCB2 


PCBCQN 
PCBXPT 


Register 1 


Address of PCBI1 
PCBRLP 






1 PCB2 


PCBRL P=0 


Dequeve PCB2, if it is currently on a queue. 


Remove PCB2 from 
its queue, 


PCBNQN=PCBFREE 
PC BXPT=0 


2.02 







2 Set pointers to attach PCB2 to PCBI or the last 


PCB related to PCBI. MABWWABEARS TEE EEBEREEEEE Register 15 


Return code=0 





Caller 





s butbeq :G uwoTRZDaS 


uoTSTAiedn 


LSE 


Diagram 5.50 Relate PCB Routine (Module IEAPCB) 


PCB1 is a PCB for which an explicit paging operation 
is currently in progress. PCH2 is to ke added tc 
PCBi‘s related queue. 


PCBXPT is saved and zeroed before calling OFFQ and 
is restored upon return. 


N 


If PCB1‘s related queue pointer (PCBRLP) is zero, 

it is set to the address of PCB2. Otherwise, PCBi's 
related chain is traced until the last PCB is found 
(PCBRLP=0) and its pointer is set to the address 

of PCB2. 
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Diagram 5.51 
Release Queue Suppression Routine 


Called by any Paging Supervisor 
routine that detects that a previously 
depleted resource has become 


available for a queve processor. Processing 


IEAPCRQS Output 









1 Save registers in the appropriate save area. 





Register | 
Scan Table Entr 
Lae a ce 2 Calculate the address of and turn off the 
number “suppress” flag in the queve header. WARWWBAASASVasaeaaaaaa aay) (CNSF-0 


Scan Table Entry 


3 = Activate the paging task's TCBif necesory QHBWRRRRRRRRRREERRR’ 


NEW=address of 
paging task's TCB 








CVTPGSUP 
CVTTCBP 


IEATCBP 


Paging Task's Top RB 
RBWCF=0 
Caller 


Register 15 





Return code=0 
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Diagram 5.51 Release Queue Suppression Routine (Mcdule IEAPCB 
poo -- $n $$ $+ + - +--+ + +--+ 


1 Since Relate PCB may be entered enabled or disabled, 
it must have two separate save areas. Upon entry, a 
switch is tested and if off, it is turned on and 
registers are saved in the disabled save area. An 
indicator is kept to show from which save area 
registers are to be restored. The switch is turned off 
when registers are restored from the enabled save area. 


2 The PCB queue header for the indicated queue is 
calculated as follows: 


PVTSCAN + 12#(input queue number-1). 


PVTSCAN is the beginning of the scan table. 
12 is the length of a scan table entry. 


3 If the "NEW" TCB pointer does not equal the paging 
task's TCB pointer (CVTPGSUP), “NEW” is set to 
CVTPGSUP. If, in addition, SCNOF in this queue‘s 
header =1 (there are TCB"S on the queue), the 
RB wait count (RBWCV) is zeroed. 
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Diagram 5.52 
Move/Build/Relate PCB — 
Subroutines for Queuing and 
Dequeuing PCBs 


In t From Move PCB or Build PCB to 
pu put a PCB list on a specified Processing Output 


queue 











Register | 


First PCB on chain 


Register 2 


Last PCB on chain 


Each PCB on Jist 


PCBC@ N=PCBNQN of 
first PCB on list 


XPTE for each PCB 


" XPTPCBQ=PCBCQN or 0 




















Prepare to move the PCB list and indicate its 
new queue in the XPTEs it is associated with, 
if any. 





Scan Table Entry 


SCNQF=1 


PCB List 





Insert the PCB list at the proper location on 
the indicated queue. 






Scan Table Entry 


SCNQPE 


JEATCBP Set so PCBs r 
PCBBQP are enqueve 
CVT ° place 





CVTPGSUP 


Paging Task's TCB 


TCBRB=top RB address 











|IEATCBP 


NEW=CVTPGSUP 


Paging task's top RB 
RBW CF=0 


3 Activate the paging task if necessary. RRBRESEEEEEEREE 
Caller 
From Move PCB, Build PCB, or 


Relate PCB to remove a PCB list 


from the indicated queue Processing 








OFFQ 
Register 1 


Address of first PCB a et 4 Calculate the address of the scan table entry 


Register 2 and remove the specified PCBs from the 


Address of last PCB eee | queue indicated, 


Scan Table Entry 


SCNFST — Se a ee ee ee 















PCBBQP of first PCB=0 
PCBFQP of last PCB=O 


Indicate that the queue is empty, if necessary. 


PCB List 


ca 





Indicate that the PCBs on the list have been 
removed from a queve. 


Caller 
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e Diagram 5.52 Move/Build/Relate PCE - Subroutines for Queuing 


PCBs (Module IEAPCB) 


| NOTES 


ca me mp ce es a oe 


- 
ti If the current queue number (PCBCON) points to the free 
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queue and PCBXPT#40, XPIPCBO is set to zero tc indicate 
that no "in-process" PCB exists for this page. 
Otherwise, CPTPCEQ is set to PCBCON. 


The next queue number (PCBNON) of the first FCB is 
tested and: 


If it is zero, return is made to the caller. 

If it points to the free queue, the PCB list is 
inserted at the top of the free queue. 

If it points to the page I/O initiation queue and: 


Page exception is indicated (PCBPEX=1), the PCE list 


is inserted at the top of the page I/0 queue. 
Page exception is not indicated (PCBPEX=0), the PCB 
list is inserted at the bottom of the page I/0 
queue. 
If it points to any other queue, the PCB list is 
inserted at the bottom of the indicated queue. 


The paging task is activated ("NEW" is set equal to 
CVTPGSUP and RBWCF is zeroed) if: 
The queue added to iS not suppressed (SCNSF#0), and 
The queue added to is dispatchable (SCNQPE#0), and 
"NEW" #CVTPGSUP, and 
It is not already active. 


The queue header is located as in IEAPCBM, Note 3. 


The queue is empty if the first PCB pointer (SCNFST) 
equals zero. 


If PCBNON#PCBFREE and PCBXPT points to an XPTE, 
XPTPCBO is zeroed. 


and Dequeuing 
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Diagram 5.53 

Queue Scanner (Paging Task) 
Entered by dispatcher when the 
paging task TCB is made ready 
through normal dispatching 





Processing 





[EAPQS 










1. Find a non-empty, processable queve 









Search the 
scan table. 


Step 4 


Input 









2 When an eligible scan table entry is found 


Appropriate Queue 
Processor 


Fulfill requests on the 
indicated queue. 





SCNFST —-7;7-- 
SCNQPE _-|/— — — 
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5.2 


Move PCB 


Move PCBs to next queue 
for which processing is 
required, 














5.48 






3 When no eligible scan table entry is found 


Search the Output 


scan table. 


Step 4 


itaneligibleventescie found > 2 


If none is found, place the paging task 
MWRRBBREEEEEEREEREEEREEEE GEER EEEEEE 


in a wait state, 





Paging Task's Top RB 
RBW CF=1 










RBO PSW = initial values 


|EATCBP=0 










Dispatcher 
(IEAODS3) 


Input Processing Output 











Q-SCAN 





Register 
4 If this scan table entry represents a non-empty, 
non=suppressed queve ARBRE BE BSE @ a a Baaaaaaaaaaa\aaa puree 
egister 





Caller 





FE Calculate and access next entry. 





Caller 


If none 


Register 15 
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lagram 5.53 Queue Scanner (Paging Task) (Module IEAPCS) 


a 
8 
Gi 


2 IEAPQS directs the flow of ccntrol to the paging 
supervision processor associated with the processakle 
queues containing pending requests. The queue is 
flagged “in-process" (SCNQIPF=1) kefore the call to the 
processor and is marked "not-in-process"™ (SCNQIPF=0) 
upon return. 


w& 


The routine is disabled during this call to QSCAN. 
Since no more work exists for the paging Supervisor, 
it puts itself in a wait state. 


The "Q" flag must ke on and the “suppress” flag must be 
off (SCNQF=1 and SCNGS=0). 


:-S 


oi 


The next entry is located 12 bytes past the last entry. 


Note: The SCNTE of the first PCB queue is scanned 
first at each entry to QSCAN. 
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Called to perform PSER Call by a supervisor routine when it 


functions but issue a 
specified message, 


Input 
RegisterQ Register 1 
EU [sec rote [See note 
CVT 


RVT 


RVTBUFAD RMS buffer 
RVTSHUT 


TCB 


TCBTIOT 

TIOT 
TIOCNJO B=jobname 
TIOCSTP=step name 










PVT 


PVTBGMS 






CVT 
MCS Prefix Area (UCM) 
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UCMOECB 
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detects an error caused by or impacting 
the paging supervisor 


Processing 











IEAPSER 


IEAPSER2 : 
For a MAJOR error: 


job and step names are needed 


JOBNAME 


Put the job and step 
names in the buffer, 










For a MINOR error: Machine-Check 


Handler 


ABTERM 
JEAQABO1 
Schedule the TCB for 


abnormal termination, 


8.12 





2. If aspecific TCB other than the paging 
task's TCB to be terminated 










3 if the GETMAIN or FREEMAIN recursion 


switch is on 


4 Build a write queve element, place it 
on the communications task's work queue, 
and post the communications task . 


GETMAIN 


RMBRANCH 


Get storage for the 
WQE, 


6.1 


JOBNAME 


Put the job and step 
name in the WQE, 





IEAOPTO1 
Post the communications 
task ready. 


3.8 


Caller 








Diagram 5.54 
Paging Supervisor Error Recorder 


Output 


RMS Message Buffer 


RVT 
















1 Pura message in the RMS buffer. [tthe MMMBBBWBBAELBRARERERRRRRARARRRRRRRRRRRRRRED VSG 0-1 | 


RMS Message Buffer 


. « . job and step names... 


























| WQEMCSF, bitO=1 
QO 


WQETXT=message text (with 
job and step names if 
requested) 


WQERTCT=UCMCMID 


WQEN BR=message length 


WQELKP+1=chain pointer 
UCM 


UCMCMID-UCMCMID+1 
UCMWQNR=UCMWQNR+1 


UCMWQEN D=new WQE 


address 


UCMWTOQ=new WQE 
address 
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Diagram 5.54 Paging Supervisor Error Recorder (Module IEAPSER) 
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If the MAJOR option is chosen, exit is taken to the RMS 
Message Writer/Wait State Effector (MCH) to 

write a message to the operator ccnsole and flace the 
system in a disabled wait state. 


This is done only if the ABTERM option was specified. 


If the GETMAIN/FREEMAIN recursion switch is on 
(PVIBGMS=1), GETMAIN cannot be called to get the 
storage for the WQF so control is returned to the 
caller. No message is printed in this case. 


The WOE represents a WTO operation to the 
communications task. 


When entry is at IEAPSER, 
Register 0: 
Byte 0 - Ignored 
Byte 1 - Bits 0-5 - Must be zero 
Bit 6 - ABTERM option flag 
ON= Terminate the designated 
task 
OFF= Do not terminate any task 
- MAJOR/MINOR option flag 
ON= MINOR error 
OFF= MAJOR error 

Bytes 2-3 - Error number (indicates caller and 

error) 

0 - If the ABTERM oftion flag is cn, use 
the TCB address in “OLD" (IEATCBP+44) 
to schedule abnormal termination. 

TCB address - If the ABTERM option flag 

is on, use this TCB 
address to schedule 
abnormal] termination. 


register contents are: 


Bit 7 


Register 1: 


When entry is at IEAPSER2, the register ccntents are: 
Register 0: 
Byte 0 - Same as Byte 1 above 
Bytes 1-3 - Address of the message to be written. 
Register 1: If the ABTERM option is selected cr if 
the message contains a jokname/stepname 
field: 
=0, "OLD" TCB is to be used; or 
=TCB address of TCB to be used. 
The message pointed to in register 0 must ke of 
that format: 


D tec 
a1 =0: & 
D: The displacement into the message at which the 
jobname and stepname of the task whose TCB 
address is indicated by register 1 is tc ke 
placed. If D=0, the jokname and stepname will 
not be inserted. 
The message length (including C). Up to 50 
bytes is allowed if the MAJOR option is 
Specified; 255 kytes are allowed for the MINOR 
option. 
The first character of the message. * if the 
message requires operator action; blank 
otherwise. 
The actual] message text beginning with 
IEANNNX where NNN iS a unique message 
number and X indicates the message tyre. 


TEXT 
-2 


[ROUTINE | 
| NAME | LABEL 
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2 If a message was not supplied (entry at IEAPSER), the 


buffer content at exit is: 


Wait State 
Code X'0028'° 49 *ITEAOUTAt PG.SUP.ERRCR ttNNNNEPt 
SYSTEMt TERMINATED 


If a messagé waS supplied (entry at IEAPSER2), the 
buffer content at exit is: 


Wait State Message Supplied message text (with 
Code X'0028' Length jobname and stepname if indicated) 
0 2 4 


ee 2 se st ow 


placed. 
stepname 


4 The WOE is set to indicate the fcllowing: 


WQEMCSF (MCS flags): Bit 0 - Routing or descriptor 


codes exist. 
WOQEAVAIL: Bit 1 - Buffer in use. 
Bit 3 - Buffer obtained dynamically. 
WOQEROUT (Routing Codes): Bit 0 - Master Console. 
Bit 9 - System Error 
Maintenance. 
WOEDESCD (Descriptor Codes): Bit 3 - System Status. 
WOERTCT: Routed WQE count. 
WOENBR: Message length. 
WOQOETXT: If no message was supplied and ABTERM was 


not called: 
fIEAQ48It PG.SUP.ERROR ttNNNNt t (RECOVERY tATTEMPTED 


If no message waS supplied and ABTERM was called: 


SSSSSSSSt TERMINATING 


If a message was supplied it is placed in this 
field with the jobname and stepname if indicated. 


| ROUTINE 


JOBNAME 


| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| IFAPSER |GMRETURN| 
Jand | | 
| LEAPSER2| | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
a & 


99t 


Input 


Registers 


Address of IOB 
Address of DEB 
Address of DCB 


Address of UCB 


CPQNPTCD 


PDITE 


PDITSQCT 
PCITINDX 


IOB 


IOBSTART 





From 1/O 


supervisor 


Processing 


|IEAPCEAP 


----- 


TA If so 


1C If not 


If any additional CPQEs are chained to 
this 1OB 


4 For an out-of-extent or permanent |/O 
error, locate the proper CPQE,. 


When the error is not permanent and: 
The error CCW belongs to the paging 
supervisor 


g 
Kannnengy(A) 


The error CCW belongs to the I/O 


supervisor 


1 > Determine whether an error condition exists. 










Free resources no longer 
needed and mark PCBs. 


1B 5.56 


ERCOMMON 


Process permanent 


|/O errors. 
5.56 











Second entry point 
Free unneeded resources. 


3.56 


LRBRRRAREEERREEEE 






TB 


CPQE 


Free unneeded resources 


and mark PCBs. 
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e Diagram 5.55 
Paging Supervisor Appendages 
(Channel End, Abnormal End) 


Output 


CPQE (next one on queue) 


SAA AAS AN ANS 













BR 14+4 


| 3D Y 
| é 
| If not, continue VARURARARLRRRALRAHRARRRERRRARRRRRRRRRREPSY POTATO 
We ot oo Pee a 3 Determine whether any CPQEs are on the y 
| : y 
slot queues for this device. Y 
: 3 AIF not BR 14+4 y 
x B51 — : 
3C If no CPQE was appended ITEAPIOS2 y) 
From YO 3 D If a CPQE was appended Append CPQEs to the ") 
“| supervisor ARAVVLVUUBURBRRRRBAY f active device. s 
| 5.44 lOB 
| [EAPABNA y) he : 
| 
LL 


BR 14+8 
TABEEBEEEREEEREEEERE 


IOBST="TIC=to" address 


IOBSTART=first CCW in 

error CPQE address 
\\ AN 

IOBSEEK=error CPQE 


seek address 


|/O supervisor 
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® Diagram 5.55 Paging Supervisor Appendages (Channel End, Abnormal End) 


(Module IEAPPCIA) 
poco - a - -- - - - 2 - -- - - -  - -  -  - - - - - -  - -  - --- -- -- -- 


* The Channel End Appendage gets control when one of the 
following I/0 interruption terminates a paging I/0 
operation without any other abnormal conditions: 


e Channel end. 
e Unit exception (with or without channel end). 


e Channel end with wrong-length exception. 


More work will exist (CPCNPTCD=TIC operation code) when 
a CPQE has keen appended but the Channel End Interrup- 
tion was presented before the channel was aware cf the 
new CPQE. 


3 The return to 4 past register 14 will cause IOS to free 
the RQE but bypass posting the completion of the I/0 
event. 


The return to 8 past register 14 will cause IOS to 
return the RQE to its logical channel queue and 
bypass posting. 

bseece5 425665 S ee ee ee te ee ee ee ee 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 2 The CPQE and PDITE are located as above. 
| 
| 
| 
| 
| 
| 
| 
| 
{ 
| 
| 
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** The Abncrmal End Appendage is entered whenever one of 
the following conditions arises: 


e Out-of-extent errors (probably an error in IEFAPIOS 
or one of its control Llocks). 


e SIO errors. 


e The CSW stored for an I/O interruption indicates 
an error other than one for which the Channel End 
Appendage gets ccntrol. 


4 There are two classes of I/O errors -- nonpermanent 
and permanent. In most cases it is the Error Recovery 
Programs (ERPs) that classify an error as permanent. 
When an error is first detected, the Abnormal End 
Appendage will get control before the ERPs. Thus, the 
error will not be marked as permanent. If the 
Abnormal End Appendage returns to IOS at the address in 
register 14, the ERPs will gain control. For errors 
from which recovery is impossikle, the ERPs will mark 
the error as permanent immediately. In this case, 
the Abnormal End Appendage will ke reentered 
immediately with the error marked as permanent. In 
cases where the I/O operation may succeed if tried 
again, the ERPs will retry the failing I/O orferaticn 
until it succeeds (in which case the Abnormal End 
Appendage will not be reentered) or until it has 
failed a specified number of times (in which case the 
Abnormal End Appendage is reentered with the errcer 
marked aS permanent. 


S For an out-of-extent or permanent error in a 
non-paging supervisor CCW, use the CPQE from IOBSTART. 


For a permanent error ina paging supervisor CCW, 
use the CPQE in which the error occurred. 


[ROUTINE | l 
|NAME [LABEL | 


IFAPAENU | IFAPABNU 
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e Diagram 5.56 
Paging Supervisor Appendages — 
Subroutines for Freeing Resources 
and Handling Errors 


From appendages to free 
completed CPQEs and mark 


PCBs as necessary Processing Output 










CPQE (each one handled) 


‘ CPQCPPTR=0 
CPQUNAV=0 
If so Caller 


Locate the associated PCB, mark it complete, |PCBIOCMP=1 1 
and route it. ecaieas bivemrneaaa WEBB AaAaaaaaaaea 
| PCBNQN=PCBTSKPQ | a 


Make this CPQE available. 






Determine whether this is the first CPQE on 
the chain. If not, handle the previous CPQE. 


CPQCPPTR 
CPQPCBAD 















PCBCQN 
PCBNQN 


GanrreUBWWWBWRPABAWRBABaaaaae bfpviews }PVTPWB=T 


From Channel End and Abnormal 
End Appendages to handle 


permanent I/O errors Processing Output 


ERCOMMON 


eee 4 


B 


PONS OOS a 


PC 

PVT 
PVTTOTAX=PVTITOTAX-~1 
PVTS VCM=PVTSVCM-1 


XPT 


XPTXAV=0 





Determine whether the failing operation was 
a read (page-in) or a write (page-out). 


For a read BEAR 8 


Write Processing 










If this PCB should be skipped, prevent 
IEAPIOP from freeing a defective external 
storage page, if necessary 


’ 
y) 
y) 
, 
, 





IN NAAN AALN mand 



















__ | 
—a | PCB 
| \\ SS PCBNQN=PCBAUX 
= ae ‘ 
l If no XPTE is present p CPQE 
-+--— Route the PCB to the auxiliary storage CPQUNAV=0 
l allocation queue and move it, if necessary 
| 
| PCB 
| Read Processing IEAPCBM PCBIOCMP=1 
SCNTE | ————_—____—_ 
Move the PCB to the PCBYHTC=1 
ele: : ers jadi = 
SCNQIPF —-——+ — _-—-- Ensure that IEAPIOP will process the failing indicated queue. 


PCBNQN=PCBTSKPQ 
PVTPWB=1 


PCB and make the CPQE available. 5.48 
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Diagram 5.56 Paging Supervisor Appendages - Subroutines for Freeing Resources 
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| 


and Handling Errors (Mdoule IEAPPCIA) 


When entered at this entry point, CBRET begins process- 
ing with the previous CPQE. 


When entered at this entry pcint, CBRET Eegins process- 
ing with the current CPQE. 


If the PCB is on the I/O active queue 
(PCBCON#PCBNON), the PCB is routed to the task post 
queue. 


The post-work bit (PVTPWB) is turned on to trigger the 
posting mechanisr for the completed PCBs. 


If PCBSKIP=1, PCERIP=1, and PCBDADDF=1, IEAPIOP will 
free the external page storage associated with this PCB 
when the I/O is marked complete. Setting PCBDADDF=0 
prevents this. The counts in the PVT are decremented 
to indicate one less page available for use in the page 
data set. 


PCBSRIP=0 and no XPTE exists is possible for swar-out 
pages. 


Routing the PCB to the auxiliary storage allocation 
queue causes another external stcrage page tc ke 
assigned to this PCB and retry to be attempted for the 
page-out operation. 


If the page PCB is on the I/O initiation queve, IEAPIOS 
will call Move PCB. 


If the PCB is on the Page I/O initiation queue, or if 
it is not and IEAPIOS is not processing (SCNQIPF=0), 


the PCB is routed to the task post queue only by setting 


PCBNCN. The I/O FLIH will call IEAPIOP when the post 
work bit (PVTPWB) is on. If IEAPIOS is processing, 
Move PCB is called to place the PCB on the task fost 
queue. 


a ee a ee ce ce es a ee a ee ee ee a ee ee ee we we we ee we we ee ee ee = 


ROUTINE 
NAME 


ERCOMMON | ERCOMMON 


| 
| CERROO 


CERRO5 
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From ABEND, ASIR, EOT, or Swap 
routine to purge paging activity for 
a terminating RB, TCB, or both 





Diagram 5.57 


Termination Interface and 


Page Hook Routines 

















Output 


PVT 





PVTSTUFM=0 
PVTMIGAB=T. 


Root PCBs for this TCB 
SB  PCBRAB=1 


PFTE 


Input Processing 
IEAPTERM 
Register 0 f————t+ 1° Foro purge by TCB or region, prevent 
Address of RB or TCB ——-4 migration if necessary. LABABARERRRRRRRRRRRRERRRRRRERRRRERAED = PVTIMGFLG-0 
| 
Register. | l 2 Prevent scheduled paging operations 
——-+ from completion. PCBPURGE 
Purge the specified 
PVT | queue. 
| 5.60 
eee 
If an RB purge Caller 
<I 3 Remove delayed second exits for paging Rurge SCR 
service requests. PCBPURGE 
7 Purge the delayed 
7 | post queue. 
5.60 
— | 
| | @ If aregion purge, prevent allocation 
| of external page storage. PCBPURGE 
| Purge the auxiliary 
| storage allocation 
| queue, 
| 5.60 
| | Caller 
| | PURGEFIX 
Root PCBs on this queue | L —t 5 ForaTCB purge, prevent delayed fixes. Purge SVC and 
branch fix delay 
=| —_— ee a ee ee ee queues. WBA Aeedaeaaa 
-it-———— 6 If a job-step TCB, remove page frame 
“ownership". MWABBAARBRARAARAABASREAE BEARERS 
From ABTERM 





to intercept 


paging supervisor 
termination 


PAGEHOOK 


SS SS SS Se 7 = Indicate appropriate error code. 


Caller 


Paging Supervisior 
Error Recorder 
IEAPSER 
Place the system in 


a disabled wait state. 
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Diagram 5.57 Termination Interface and 
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If PVTMGFLG=1 and PVISTUFM=1 and: 
e The purge is by TCB, they are set to 0. 
e The purge is by region, no action is taken. 


If PVTMGFLG=1 and PVTSTUFM=0, and the input TCB matches 
the TCB to be migrated (PVTMIGRB=Register 0), the 
ABEND migrate flag is set (PVITMIGAB=1). 


PURGEPCB is called once for each of the 3 PCB queues 
scanned (I/O active queue, real storage allocation 
queue, and I/O initiation queue). 


PURGEFIX is called once for each queue purged. 


If TCBJSTCB=register 0, this is a job-step TCB. 
PFTWHOSE is set to 0 in every PFTE in which PFTWHOSE 
equals register 0. 


If register 1 = 0, the paging task was scheduled for 
termination for an external reason. Error code 2101 
is passed to IEAPSFR. 2100 is passed if register 1 
= 4 (a program check occurred in the paging task). 


Entry codes are: 
0 - purge ky TCB. 
4 - purge by RB. 
8 - purge by region. 


PURGEFIX marks root PCEs, associated with the FIX re- 
quests made by the task being terminated, for “ABEND 
interception.” 


If the root PCB is for this TCB (PCBRTCB=input TCB 
address), its PCBRAB flag is set to 1. The next root 
PCB on the queue is accessed (via PCBRWK3) and the test 
is repeated. When the end of the queue is reached 
(PCBRWK3=0), return is made to the caller. 
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Page Hook Routines (Module IEAPTERM) 


OUTINE | | 
| NAME [LABEL | 


+ ++ 
| LEAPTERM | PURGETCB | 


PURGERB 


TEST1 
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PURGEFIX 
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Diagram 5.58 

FIX Quiesce and Purge Routines 
From TSO Quiesce routine to 
free all non-intercepted fixed 


pages and to purge PCBs for a 
specified TCB chain 


Root PCBs on Queue 


From ABEND, EOT, 

and ASIR to free and 
purge fix requests for 
a terminating task 


3 Quiesce FOEs associated with input TCBs: 
Pp 










Input Processing Output 
IEAPFIXQ 
Register O 
eal ae TCB to = 4 Remove delayed (queued) fix requests. FIXQPURG 
e quiesce 
| Root PCBs quiesced 
Register ] | Purge SVC and branch SBRARET 
WARARAERRRRRRRES 
Address of last TCB to | FIX delayed requests. 
be quiesced | 
iA | 2 Purge PCBs 
PVTSFXDQ Prevent scheduled paging operations 
| from completing. PCBPURGE 
TCBLSQA PVT BF XDQ J Purge specified 


PCB queve. 





5.60 













IEAPFIXP 
input TCBs TCB 
— A. If there are no more FOEs to puge MMMUUBRRRRRRERRRRRRRRRRRRRRRRBRRBRED TCEFOF0 | 
Register | | 
Caller 

TCB address — —— B, If this FOE is not intercepted, 

am . issue a FREE for the page it FOE 
TCB 1 | represents. RARLUBEBRRREBRERALERERABRRERRRRRRREDS 
TCB FOE =| 

| Page Service 
FOE | Interface Routine 
IEAPSIQR 
FOEIN = 
| Perform FREE 
FOEFLINK — — J] processing. 
ol 5.20 
| aes A If for quiesce and not purge, obtain the 





next FOE, 


For purge, free the FOE's storage. 


Obtain the next FOE. 


> 3 A 
FREEMAIN Routine 


| RMBRANCH 
6.1 


> 3 A 
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Diagram 5.58 FIX Quiesce and Purge Routines (Module IEAPTERM) 


ce ce cm cm ee ce ce ce ce ee ee ee ee i ee ee i a ew 


1 FIXQPURG is called once for each queue purged. 


2 PURGEPCB is called once for each of the four PCB queues 
purged (page I/O active queue, I/O initiation queue, 
real storage allocation queue, and delayed fost PCB 
queue). Quiesce is indicated for all the calls. 


Go 


This loop (FOEPURGE internal subroutine) is completed 
once for each input TCE. 


3A If entry is at IEAPFIXP, registers are restored 
before return. If entry is for quiesce (at 
FOEPURGE) return is immediate. 


3B If FOEINT=1, the FOE is either purged or quiesced 
already and no FREE is issued for it. 
Parameters passed to FREE (IEAPSIQR) are; 


Register O - TCE address 
Register 1 - first half of VSL entry 
Register 2 - second half of VSL entry 


on 


Parameters passed to FREEMAIN are: 


X"FFOOO0008' 
- FOE address 
- CVT address 
TCB address 
- 0 


Register 
Register 
Register 
Register 
Register 


We We © 


FIXQPURG quiesces activity On one of the FIX delay 
queues. 


TCBLSQA of the TCB pointed to ry the first (next) 

root PCB (via PCBRTCB) is compared to TCBLSQA of 

the input TCB. If they are not equal, or if they 

are equal but the root PCE is marked for ternination 
interception (PCBRAB=1), the next root PCB is accessed 
(via PCBRWK3), and the comparison is repeated. 


When a match is found, if the SVC FIX delay queue is 
being quiesced, the issuer of the FIX is posted. 
POST is called with the following parameters: 


Register 10 - post code = X*"30' 
Register 11 - ECB address (from PCBRWK1) 
Register 12 — TCB address (from PCBRTCB) 


Upon return, or if POST was not called (that is, if 
the branch FIX delay queue is Leing quiesced), PCBRAB 
is set to 1 and the search continues with the next 
root PCB. 
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| NAME | LABEL 
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IEAPFIXP | CALLFOE 
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FOEDONE 
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FIXQPURG 
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Diagram 5.59 (Steps 1-5) 
FIX Restore Routine 

From TSO Restore routine 

to reinstate quiesced FIX 

requests 








Input Processing 


[EAPFIXR 
Register O 
Address of first TCB 







GETMAIN Routine 
RMBRANCH 





Obtain storage for and initialize an "anchor" 
work area for this entry. 







Register | 


Address of last TCB 


Register 2 
Address of ECB 


6.1 















Determine whether any FIX requests must be 
restored for the first (next) TCB. 


If not, repeat for the next TCB. 


If no more TCBs 


TCBFOE GETMAIN Routine 


RMBRANCH 








Obtain and initialize a work area (including 
VSL entries) for this TCB. 








6.1 


Page Service 
Interface Routine 
IEAPSIQR 


Perform FIX 
processing. 


FOEINT 
FOEFLINK 
FOEVINDX 





Restore previously quiesced FIX requests for 


this TCB, 












Register 15 


Return code from ae 
IEAPSIQR 


5.20 


Determine the status fo the FIX attempt: 


A. If the FIX completed normally = 2 





B. If the FIX ts in progress (a second 
exit is expected), increment the 
anchor wait count, 








If this is a second exit retum and 
the FIX completed normally, decrement 
the anchor wait count. 


If the FIX was not successful, indicate 
an error, 










If this is a second exit return and the 
FIX was not successful, indicate an error 
and decrement the anchor wait count. 


(Continued at Step 4) 
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Diagram 5.59 (Steps 1-5) FIX Restore Routine (Module IEAPTERM) 


ee a ea ee er or | AEs ara i Sa a alae 1 

| |ROUTINE | | 

| NOTES | NAME |LABEL | 
—a=—------—--—-~--~~ ~~ -- +--+ - +--+ - - -- - + +--+ ++ + 
1 The "anchor" contains information pertinent to this | IEAPF IXR | SETNEG 


request. The work areas (including VSLs) for each TCB 


are chained to the anchor. Initially, registers are 
saved in it and the error flags, wait count (count of 


pending second exits), and post code fields are zeroed. 


Each FOE chained to this TCB is searched. An internal 


FOECOUNT is set to 0 and incremented for each inter- 
cepted FOE (FOE with FOEINT=1) on the chain. If at 
the end of the search FOECOUNT=0, the next TCB is 
accessed. 


The work area is obtained from subpool 255 and its 
length is (8*FOECOUNT)+8. In it, the TCB address is 
saved, the return code field is set to X‘'FF', 

and all flags are zeroed. 


For each intercepted FOE on this chain, a VSI entry 
is built in the work area as follows: 


VSLSTART address is set to FOEVINDX. 
VSLEND1 is set to VSLSTART + 1. 
The flag byte is zeroed. 
The parameters passed to IEAPSIOQOR are: 
Register 0 - TCB address. 
Register 1 - Bit 0 - 1 (to indicate list entry) 
Bytes1-3 - First VSL entry address. 


The return code from IEAPSIOR is placed in the werk 
area and the anchor fost code is set as follows: 


If the return code The post code is 


from IFAPSIOR is set to 
0,32 x*OO* 
4, 28 x'ou? 
3 none 

12,16,20, 24, 40 X'oc* 
36,44 x*10' 


(For an explanation of the FIX return codes, see 
Diagram 5.21, Note 19.) 


A “no-FREE" flag in the work area, and the error flag 
in the anchor are set if any return code other than 
0, 8, or 32 is received. 
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Diagram 5.59 (Steps 6-8) 
FIX Restore Routine 


Processing Output 


BR 14 


6 |f there are second exits pending Caller 


If no second exits are pending and 


no errors occurred > S A 


Page Service 
Interface Routine 
7 = \f errors were encountered, FREE (back 


IEAPSIQR 


out) restored FIX requests. 
Perform FREE 


processing, 


8s 5.20 


FOEs for restored 





FIX requests 
8 A. Allow restored FIX requests to be processed, MA RRRRBRRBRRRRERERERERRER ER N\ 


B. Free storage for work areas (if any), inform 
the caller of action taken, and free the 
anchor work area. FREEMAIN Routine 


RMBRANCH 


POST Routine 
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IEAOPTO1 
Post the specified 





ECB. 
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FREEMAIN Routine 
RMBRANCH 
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Diagram 5.59 (Steps 6-8) FIX Restore Routine (Module IEAPTERM) 


(a ee ee eee 1 La Soe omiaccrcan waa =—=4 

JROUTINE | | 
| NOTES | NAME |LAEEL | 
}--------~--------------------------------------------------- $-------- $-----——4 
| 6 If the anchor wait count # 0, second exits are pending. |IEAPFIXR|WCEQO | 
| l { | 
| 7 The “"no-FREE" flag is set in the work areas where | | EACKMORE | 
| errors were encountered because FIX backs out its own | | | 
| failing requests. The FIX Restore routine must hack | | { 
| out (issue a FREE) for requests that completed | | | 
| successfully. | | | 
| | | | 
| IEAPSIOR is called once for each completed restore. | | | 
| The parameters passed to it are: | | | 
| | | | 
| VSL byte 0 - X‘Q2° | | | 
| Register Q - TCB address | | | 
| Register 1 - bit 0-1 | | | 
| bytes 1-3 - first VSL entry address. | | | 
| | | | 
| 8 FREEMAIN is called once for each work area. If FIX | |FREEWA | 
| requests are being backed out, FREEMAIN is called | | | 
| after each return from IEAPSIOQR and then again for | | | 
| each work area not backed out (after the last return | | | 
| from IFAPSIOR). | | | 
| | | | 
| Parameters passed to POST are: | |POSTIT | 
| | [ [ 
| Register 10 - post code | | | 
| Register 11 - ECB address | | | 
| Register 12 — TCB address. | | | 
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Diagram 5.60 (Steps 1-5) 
Subroutine for Purging PCBs 


From IEAPTERM (5.57) and 
IEAPFIXQ (5.58) to remove 


PCBs from a queue for a task 


Input Processing Output 


PURGEPCB 


1 If the queve is empty Caller 


Register 0 
2 Determine type of request: 


TCB > 4 
Register 1 
Request type: Region > 5 


00 TCB 


-1 Quiesce Quiesce EEE 8 


04 =RB RB Request 

08 Region 3 sif this PCB is: 

for a page-in and 

for the input RB and 

not marked to prevent posting, 


prevent posting and decrement the RB MAWRRRRRRRRRREREREEERRS) 


wait count. 


Otherwise SES 11 


TCB Request 
4 lf the PCB is for the input TCB, prevent DARBARRRRRREEEE' 


posting and root completion (if the root 


PCB is used). > 11 y 
Otherwise => 11 : 
Axnetep 


Region Request 


5 sif the virtual page for this PCB is Root PCB 
Root PCB neither in the SWA segment (if one PCBRINT=1 


PCBRTCB exists) nor the TCB's region limits ee 1 1 A 


(Continued at Step 6) 


Queue number to 
be purged 


Register 2 
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Diagram 5.60 (Steps 1-5) Subroutine for Purging PCBs (Module IEAPTERM) 


eee Sr a re eT ee ee ee ee eee aH SSS==S-F 
| | RCUTINE | | 
| NOTES | NAME | LABEL | 
fa ea ea 25 =-f---=-- 1 
{ 1 | PURGEPCB | | 
| | | | 
| 2 | | TESTTYPE | 
| | | | 
| 3 Since an RB can have only one outstanding paging re- | |RBPURGE | 
| quest, the search is stopped as soon as it is found. | | | 
| | | | 
| The PCB is for a page-in if PCBIOI=1 or if the PCB is | | | 
| on the real storage allocation queue. | | | 
| | | | 
| 4 If PCBICF=0, the PCBRIP filed points to a roct PCB | |TESTTCB | 
| and the TCB is found via PCBRTCB. If this route is | | | 
| taken, PCBRINT is set to 1. | | | 
| | | | 
| 5 If SWAHPTR=0, no SWA segment exists. The SWA limit is | |REGION | 
| in SWABSEGX. The TCB limit Fegins with the first | | | 
| segment number in TCBSTI and continues for TCBSTC | | | 
| segments. | | | 
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lf a PCB for this region is found: 


A. For a page-in: 


set (if valid). 











e If the XPTE is valid and the contents of 
the page cannot be destroyed 


the page can be destroyed, set up to free 


\\ 


PRBARRasas 
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C. For either a page-in or page-out, prevent 


further processing of this PCB. IN ANA 








“anne 


VAN 


7“ 
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7 Prevent reclamation or posting for this PCB and 


all PCBs related to it. Raw 


(Continued at Step 8) 
TIA 





RWABRRRRBRRERELY 
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e Indicate page is part of swap-in working WARRERRBRRR EN MBE eTIAKE! | 


e Indicate real address no longer usable. MARR RRARRR EEN SSAA NS PCB 


B. For a page-out: LABRRRRRRRRRRRRBRBY PTC BSI=0 


BABRRREREERERRERRPM XPTLPA-0 


e If the XPTE is valid and the contents of a LNXANN 
external page storage. IN ANN wae, 
e In either valid case Lee TARRY 


e@ Validate the PTE for all page-outs. QBak Ne 
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Diagram 5.60 (Steps 6-7) 
Subroutine for Purging PCBs 
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Diagram 5.60 (Steps 6-7) Subroutine for Purging PCBs (Module IEAPTERM) 


(See ey er ee ee a ee Se ee ee ee eS Pe AS Sears | 
| |ROUTINE | | 
| NOTES | NAME [LABEL | 
a ea cea aa ae ep eR en NP rp ee ea ee eS Eo ------—-- 
| 6 The PCB is for a page-in if PCBIOI=1 or if the PCB is |PURGEPCB|INOUTTS | 
| on the real storage allocaticn queue. | | | 
| { | 
| 7 | | PCBVBNO | 
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Virtual storage is the name given to the 
entire span of addresses available ona 
System/370 with the dynamic address trans- 
lation feature enabled. The size of virtu- 
al storage is equal to the size of real 
storage when the system is operating in BC 
(basic control) mode or EC (extended con- 
trol) mode with translation disabled. But 
when the system is in EC mode with transla- 
tion enabled, the size of virtual storage 
is limited only by the addressing capabili- 
ty of the system, not by the size of real 
storage. 


Like other system resources, virtual 
storage can be shared by many users. Con- 
Sequently, the allocation of space within 
virtual storage must be supervised. Space 
must be allocated to a user when it is 
needed and freed when it is no longer 
needed. The supervisor routines that con- 
trol the allocation and release of virtual 
storage are collectively referred to as the 
VSS (virtual storage supervision) routines. 


The VSS routines service two macro 
instructions: GETMAIN (which is used to 
allocate storage) and FREEMAIN (which is 
used to release storage that was allocated 
previously). When executed, each macro 
instruction results in an SVC interruption 
and passage of control to the appropriate 
VSS routines. For an overview of the 
method of operation of the VSS routines, 
see Diagram 6.1. 


Requests for allocation of virtual 
storage are serviced by a subset of the VSS 
routines called the GETMAIN routines. 
(There is no actual routine with the entry- 
point name GETMAIN.) These routines ser- 
vice all requests for virtual storage, 
including requests for a new region, space 
within an existing region, Space within a 
local system queue area, space for a system 
work area, and space within the system 
queue area. The GETMAIN routines create, 
reference, and continually update queues of 
control blocks to determine whether a requ- 
est for storage can be satisfied, and from 
where it can be satisfied. The GETMAIN 
routines pass the address of the allocated 
area to the requesting routine (in general 
register 1 if an Svc 10 instruction caused 
entry, or in a user-specified location if 
an SVC 4 instruction caused entry). For an 
overview of the method of operation for 
allocating storage, see Diagram 6.2. 
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Requests to free virtual storage are 
serviced by a sukset of the VSS routines 
called FREEMAIN routines. These routines 
update control block queues to reflect the 
release of previously allocated space, 
thereby making the space available for 
reallocation. The FREEMAIN routines ser- 
vice all requests to free virtual storage, 
including requests to free an entire 
region, space within a region, space within 
a local system queue area, space within a 
system work area, and space within the sys- 
tem queue area. For an overview of the 
method of operation for releasing storage, 
see Diagram 6.27. 


The VSS routines assign blocks of 
storage to the various tasks according to 
their needs. The virtual storage supervi- 
sion routines: 


e Allocate storage blocks on request. 
e Release storage blocks on request. 


e Ensure that sufficient external page 
storage exists to back up batch- 
processing and TSO jobs. 


e Ensure that fixed page-frames exist for 
all SQA, LSQA, and nonpageable (V=R) 
region space allocated. 


e Maintain a record of storage allocated 
from supervisor-owned storage, when 
requested. 


e Monitor requests for user storage and 
storage in subpools 251 and 252 (user's 
job pack area). 


e Maintain storage usage information. 


e Protect storage with fetch protection 
and storage protection keys. 


SUBPOOLS 


A sukpool is a group of logically 
related storage blocks identified by a suk- 
pool numker. The subpool number indicates 
to the VSS routines the kind of storage 
that is requested. Figure 6-1 summarizes 
the subpool assignments. 
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c 
| Subpool 
| Number 


| 238 
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Indicates 
Request for 


Space within 
a region 


Space within 
LSQA (task- 
related) 


Space within 
LSQA 
(job-step- 
related) 


Space within 
LSQA 
(explicitly 
assigned 

and freed) 


Space for 
SWA 


Space within 
SWA 


> ED a a a ee a ae oe 


Figure 6-1 (Part 1 of 3). 
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Attributes 
of Subpool 
Job-oriented 
Job step's 
protection key 
Fetch-protected 


For TSO 
use only 


Job-oriented 
Fixed 
Protection 
key=0 
Task-related 
Swappable 
Not fetch- 
protected 
Job-oriented 
Fixed 
Protection 
key=0 
Job-step- 
related 
Swappable 
Not fetch- 
protected 
Job-oriented 
Fixed : 
Protection 
key=0 
Explicitly 
assigned and 
freed 
Not fetch- 
protected 
Swappable 
For system | 
only 
Protection 
key=0 
Fetch-—protected 


+ — — — HH HH 


+ — — — — — + 4 


For system use 
only 
Protection 
key=0 
Fetch-protected 


These are the only valid subpool numbers 
for programs running in problem state. 
request for a higher number will cause 
the problem program to be abnormally 
terminated. When requested by programs 
in supervisor state and key 0, subpool 
252 is assigned. 


Reserved for compatibility with VS1. 
Undefined. 


To reserve external page storage for a 
TSO task. 


Allows a task running in key 0 or super- 
visor state to acquire accountable, 
fixed, protected storage that is job- 
oriented and freed at end of task. 


a oe oe © 8 ee = © 8 © ee 9 wn 8 2 2 © 2 a 2 2 2 2 2 2 2 9 eo 


Allows a task running in key 0 or super- 
visor state to acquire accountable, 
fixed, protected storage that is job- 
oriented and freed at end of job step. 


Allows a task running in key 0 or super- 
visor state to acquire nonaccountable, 
fixed, protected storage that is job- 
criented. 


To assign or free a segment of pageakle 


virtual storage for the system work area. 


Reserved for compatibility with VS1. 


Undefined. 
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Table showing attributes and uses of subpools 
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gears oe a ite ee rae ee ag a eT ee ee ee 
| Subpool | Indicates [ Attributes | I 
| Number | Request for { of Subpool | Notes | 
}--------- ~-----~--------}---------------- }------------------------------------------- { 
| 240 | Space within | Job-oriented | Treated as subpool 250 to maintain com- [ 
| | a region | Pageable | patibility with MFT. Automatically freed | 
{ | (job-step- | User's pro- | at end of step. | 
| | related) | tection key [ | 
| ; | Fetch-protected | | 
| | | Job-step- | | 
; [ [| related | | 
[--------- +---------------- ---------------- }--------~--------------------—-------—---- = 
| 241 | Space within | System-oriented| Mapped into subpool 245. | 
[ | SQA | Pageable [ [ 
| | (explicitly | Protection [ | 
| | assigned {| key=0 | | 
| | and freed) | Explicitly | | 
{ { [| assigned and | | 
| | | freed | | 
[ [ | Not fetch- | | 
{ { | protected ; | 
}--------- }--------------- -{---------------- }------------------------------------------- { 
{ 242 | Nonpageable For scheduler | A new ncnpageable region is assigned or { 
| region use only | an existing nonpageable region is freed. | 
|--------- }---------------- ---------------- {------------------------------------------- { 
{| 243 | Space within Systenm-oriented| Allows a task running in key 0 or super- | 
[ | SQA Fixed | visor state to acquire accountable, { 
i | (task-related) Protection | fixed, protected storage that is systen- | 
[ [ key=0 | oriented and freed when the task termin- | 
f [ Task-related | ates. { 
| | Not fetch- | | 
{ | protected [ { 
- }~----------------}+--------------- }------------------------------------------- { 
} | Space within | System-oriented| Allows a task running in key 0 or super- | 
| | SQA (job- | Fixed | visor state to acquire accountable, | 
; | step-related) | Protection | fixed, protected storage that is system- | 
[ | | key=0 | oriented and freed when the job step | 
[ [ | Job-step- | terminates. | 
[ [ | related | | 
[ [ | Not fetch- [ | 
| | | protected | [ 
[--------- {---------------- }-—---—-------— }------------------------------------------- { 
{| 245 | Space within | System-oriented| Allows a task running in key 0 or super- | 
; | SQA (expli- | Fixed | visor state to acquire nonaccountable, | 
[ | citly assigned | Protection | fixed, protected storage that is system- | 
| | and freed) | key=0 {| oriented. | 
| { | Explicitly ; [ 
; | | assigned and | | 
| | | freed | | 
| | | Not fetch- | | 
[ [ | protected [ [ 
|---------4---------------- $---------------- }------------------------------------------- { 
| 246 | | | Reserved. Used in MVT to exchange regions. | 
|--------- {-----------—---- ---------------- }------------------------------------------- 
{| 247 | Pageable | For scheduler | A new pageable region is assigned or an | 
[ | xegion | use only | existing pageable region is freed. Ex- [ 
| | [ | ternal page storage allocation is assumed | 
| [ { | when using this subpool. { 
|--------- {---------------- +-—--—--_-——--- }~-----------~-------~---------------------- 
| 248 | { | Reserved. Used in MVT for rollout/rollin. | 
|-----—---4---------------- ~-------------— {-------~-------------——-------—-—----—---- { 
| 249 | LSQA | For scheduler | New segments of virtual storage are as- | 
| segments { use only | signed for LSQA, or existing segments are | 
| | | | freed. | 
ee eee ea o Nee enn cee een ea i nn ee a ga er Oe ee eee J 
Figure 6-1 (Part 2 of 3). Table showing attributes and uses of subpools 
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Figure 6-1 (Part 3 of 3). 
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Indicates 
Request for 


Space within 
a region 


Space within 
a region 


Space within 
a region 


Space within 
LSQA (task- 
related) 


Space within 
LSQA (job- 
step related) 


Space within 
LSQA 
(explicitly 
assigned and 
freed) 


Attributes 
of Subpool 


Job-oriented 


User protection 


key 


Fetch-protected 


Job-oriented 


User's protec-— 


tion key 
Job-step- 

related 

Protected 


Job-oriented 
Protection 
ke y=0 
Job-step- 
related 
Swappable 
Not fetch- 
protected 


Job-oriented 
Fixed 
Protection 
key=0 
Task-related 
Not fetch- 
protected 
Swappable 


Job-oriented 
Fixed 
Protection 
key=0 
Job-step- 
related 
Swappable 
Not fetch- 
protected 


Job-oriented 
Fixed 
Protection 
ke y=0 
Explicitly 


assigned and 


freed 
Swappable 
Not fetch- 

protected 


Allows a task running in supervisor state 
to acquire unprotected storage in the 
user's region. All subpool 250 requests 
are assigned subpool 0 (high end of the 
region) of the associated task. 


Allows a task running in key O or super- 
visor state to acguire accountable, 
unprotected, pageakle storage in the low- 
address end of the user's rpartition. 
Space is job-oriented and automatically 
freed at the termination of the job step. 
Used for nonreenterable modules in the 
job pack area. 


Allows a task running in key 0 and super- 
visor state to acquire accountable, page- 
able, protected storage in the high ad- 
dress end of the user's region that is 
jok-oriented and automatically freed at 
the termination of the job-step task. 
Used for reenterable modules from the 
SYS1.SVCLIB or SY¥S1.LINKLIB. 


Allows a task running in key 0 or super- 
visor state to acquire fixed, account- 
able, protected storage in the LSQA for 
the user's region that is job-oriented 
and freed when the task terminates. 


Allows a task running in key 0O or super- 
visor state to acquire fixed, account- 
able, protected storage in the LSQA for 
the user‘s region that is job-oriented 
and freed when the job step terminates. 


Allows a task running in key 0 or super- 
visor state to acquire fixed, nonaccount- 
able, protected storage in the LSQA that 
is job-oriented and must be explicitly 
freed. 


Table showing attributes and uses of subpools 








In addition to their use in distinguish- 
ing among the kinds of virtual storage, 
Subpools give the user a means of sharing 
or isolating storage within his region. A 
user task and its subtasks operate within 
the same region, and since the hardware 
storage protection keys are assigned to the 
entire region, they cannot be used to isol- 
ate areas of storage to particular sub- 
tasks. Subpools 0-127 allow the user to 
isolate storage from another task executing 
with the same storage protection key, or 
from later entries into the same program. 
Unshared subpools 0-127 are freed when the 
user task terminates. 


The user may also use subpools 0-127 to 
Share common areas of storage between tasks 
of the same job step. Shared subpools are 
freed when the owning task terminates, not 
when a Sharing, but not owning subtask 
terminates. 


SYSTEM QUEUE AREA AFTER INITIALIZATION 


The SQA (system queue area) contains 
system control blocks required from one IPL 
to another. The size of the SQA is always 
a 64K segment multiple. The number of 64K 
segments set aside for the SQA is a system 
generation option and can be changed during 
system initialization. After initializa- 
tion, SQA virtual address space cannot 
expand; however, the number of page frames 
asSigned to the SQA does increase and 
decrease while the system is running. 


Because system control blocks are used 
so frequently, each SQA page is fixed in 
real storage when it is allocated. If the 
pages were not fixed and if (in the worst 
case), each control block in a queue were 
on a Separate page, a search of that queue 
would cause excessive paging. Each 
reference to a control block could cause a 
page fault and a page-in operation to bring 
that page into real storage. To avoid 
this, each SQA page is fixed in real 
storage when it is allocated. 


Before the system is generated, users of 
the VS2 system must specify the amount of 
Space needed for the SQA and, optionally, 
the size of the quickcell area within the 
SQA. During execution of the nucleus 
initialization program, a DQE (descriptor 
queue element) containing a record of the 
number of bytes assigned to the SQA is 
built within the area. In addition to the 
DOE, an FQE (free queue element) is built 
that contains the number of bytes of avail- 
able space (initially, all space is avail- 
able) in the SQA. Optionally, the initia- 
lization program also builds a QCDBLK (qui- 
ckcell descriptor block) describing SQA 
quickcells (see “Allocating and Freeing 
Quickcells" in this section). Location 
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GOVRFLB in the nucleus (pointed to by the 
secondary CVT) contains a pointer to the 
descriptor queue element, and the descrip- 
tor gueue element contains a pointer to the 
free queue element. Figure 6-2 shows the 
control Llocks used for virtual storage 
supervision as they are immediately after 
system initialization. 


NIP (the nucleus initialization program) 
initializes other control blocks in the SQA 
to describe the contents of the dynamic 
area. The dynamic area consists of the 
pageable dynamic area and the nonpageable 
dynamic area. The dynamic area is defined 
when NIP initializes the partition queue 
element for the dynamic area for pageakle 
tasks (V=V PCE) and the partition queue 
element for the dynamic area for nonpage- 


GOVRFLB 


=] Describes the space assigned to the SQA. 





QCDBLK 
ag ivy <9] Describes space in 
_ gj the SQA quickcel| 
_ 9 area (optional). 





FQE 


Describes the free space in the SQA, 








QCDATA 






™ Describes the 
P84 quickcel! 

| J requirements for the 
GQ] SQA or an LSQA 
ae (optional). 


DPGQE 


V=V PGE 


Describes the pageable dynamic area, 


FBQE 


"ory Describes all free 
~ 1 blocks in the 
pageable dynamic 
*4 area. 





V=R PQE 
Describes the nonpageable dynamic area. 


Describes all free 
blocks in the 
nonpageable 
dynamic area. 








Figure 6-2. VSS control blocks after sys- 


tem initialization. 


Virtual Storage Supervision 401 


able tasks (V=R PQE). NIP anchors these 
PQEs to the PQEPTR field in the GOVRFLB 

control block in the nucleus via a dummy 
PQE. 


The V=V PQE is the anchor for the free 
block queue that describes blocks of avail- 
able space within the pageable dynamic 
area. After initialization, the pageable 
dynamic area is described by only one FBQE 
(free block queue element) since the entire 
area iS available. When the system 
requests any of the following services, 
appropriate control block queues are modi- 
fied to remove space from, or return space 
to, the free pageable dynamic area: 


GET LSQA (subpool 249) 
FREE LSQA (subpool 249) 
GETPART V=V (subpool 247) 
FREEPART V=V (subpool 247) 
GETSWA (subpool 236) 
FREESWA (subpool 236) 


(Figure 6-6 illustrates virtual storage 
after space has been allocated for a page- 
able task.) 


The V=R PQE is the anchor of the control 
block queue that describes blocks of avail- 
able space within the nonpageakle dynamic 
area. After initialization, the entire 
nonpageable area is available for alloca- 
tion and is described by only one FBQE. 
When a system routine requests GETPART V=R 
Or FREEPART V=R, appropriate control block 
queues are modified to allocate space from, 
or return space to, the free nonpageable 
dynamic area. (Figure 6-7 illustrates vir- 
tual storage after an LSQA and a region 
have been allocated for a nonpageable task.) 


ALLOCATING SPACE IN THE SYSTEM QUEUE AREA 


The system queue area is used by the 
supervisor to satisfy requests for space in 
subpools 241, 243, 244, and 245. Requests 
for space in subpools 233, 234, 235, 253, 
254, and 255 are also satisfied from the 
SQA if there is not enough space available 
in the LSQA or when a task is being abnorm- 
ally terminated and its LSQA space is 
exhausted. (See “Allocating Space in a 
Local System Queue Area™ below.) 


Subpool 243 is used for task-related SQA 
Space that is freed automatically when the 
task terminates. Subpool 244 is used for 
job-step related SQA space that is freed 
automatically when the job step terminates. 
Subpool 245 is used for explicitly assigned 
SQA space and must be explicitly freed. 
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(See “Allocating and Freeing Quickcells" in 
this section.) Subpool 241, which is 
included in VS2 for compatibility with VS1, 
is treated as sukpool 245. (For a complete 
list of VS2 subpools, see Figure 6-1.) 


If all of the virtual space for the SQA 
is exhausted, or if a fixed page is not 
available for an SQA request, the system is 
placed in an enabled wait state. 


ALLOCATING SPACE IN A LOCAL SYSTEM QUEUE 
AREA 


An LSQA (local system queue area) con- 
sists of one or more segments of virtual 
storage. One LSQA is created for each 
initiator and lasts for the life of the 
task. The system uses each LSQA to contain 
various control rlocks. VSS uses each LSQA 
to store queues of control blocks that con- 
tain the information necessary to keep 
track of the free space and allocated space 
within a user's region. Figure 6-3 shows 
the format of the LSQA segments after they 
have been initialized by the Get LSQA Seg- 
ment routine. 


Segments for an LSQA are assigned from 
the highest addressed segments available in 
the pageable dynamic area (see Figure 6-6 
and Diagram 6.11). Within an LSQA, space 
is allocated from the highest addresses to 
the lowest. 


Storing in the LSQA is restricted to 
control program routines that operate under 
a pretection key 0. Non-key-0O users can 
only read LSQA storage. 


_ (Racered® 
f  Quickeell Areat# Area‘ ine 
age 
QCDBLK® SVB’ 


Segment 


Free Space 





Field Explanations: 
" Subpool queue element (SPQE) for LSQA 
* Descriptor queue element (DQE describes the entire LSQA segment) 
3 Reserved for future use 
* Quickcell area (see "Quickcell Allocation") 
° Quickcell descriptor block 
® Skeleton TCB 
” Supervisor request block (SVRB) 


8 ree queue element (FQE) 


Figure 6-3. An LSQA segment after 


initialization. 
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To obtain space in an LSQA, requesters 
must specify subpools 233, 234, 235, 253, 
254, or 255 in their GETMAIN macro 
instructions. 


Normal LSQA requests for one page or 
less are not satisfied across page boun- 
daries. LSQA segments are allocated from 
the pageable dynamic area. Pages within 
the segments must be obtained and fixed 
before a GETMAIN request for LSQA can be 
satisfied. If a page of real storage is 
not available, the requesting task is 
abnormally terminated and all requests for 
LSQA space by the ABEND routine are statis- 
fied from the SQA. This is done to avoid 
an ABEND recursion (a second entry to the 
ABEND routine). 


Normal Requests for LSQA Storage 


Normal LSQA requests for a page or less 
that are not quickcell candidates are sati- 
sifed by searching the FQE (free queue ele- 
ment) queue in the LSQA to find a block of 
storage closest in size and large enough to 
satisfy the request. When an LSQA request 
is satisfied, a new FQE must be created to 
replace the FQE for the space just allo- 
cated (unless the request was for exactly 
the size of the free area described by an 
FQE, in which case that FQE is simply 
removed from the FQE queue and not 
replaced. ) 


Storage blocks in subpool 233, 234, 253 
and 254 have an AQE (allocated queue ele- 
ment) appended to them. Subpool 233 and 
253 AQEsS are chained from the requesting 
task’'s AQE queue. Subpoool 234 and 254 
AQES are chained from the requesting task's 
job-step task AQE queue. The AQE contains 
the length of the allocated area (which 
includes the AQE itself). 


No record is kept of the allocated space 
by the system for subpools 235 or 255. 


Subpool 233, 243, and 253 Allocation 


When subpoool 233, 243, or 253 is speci- 
fied in a GETMAIN macro instruction, the 
GETMAIN routines add eight bytes to the 
Size requested, and the location of the 
beginning of the available space is deter- 
mined. A GETMAIN routine builds an AQE in 
the first eight bytes of the requested 
area. It then chains the AQE to an AQE 
queue whose origin is in the TCB (TCBAQE 
field) of the task for which the space was 
requested. When that task is terminated, 
the termination routines issue a FREEMAIN 
Macro instruction to free all space in the 
subpool that had not been already freed. 
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Subpool 234, 244, and 254 Allocation 


When subpool 234, 244, or 254 is speci- 
fied in a GETMAIN macro instruction, a GET- 
MAIN routine builds an allocated queue ele- 
ment as it does for subpoools 233, 243, and 
253, but chains the AQE to an AQE queue 
whose origin is in the TCB of the job step 
for which the space was requested. When 
that job step is completed, the termination 
routines issue a FREEMAIN macro instruction 
to free all space in the subpool that had 
not been already freed. 


Subpool 235, 241, 245 and 255 Allocation 


When subpool 235, 241, 245, or 255 is 
specified in a GETMAIN macro instruction, 
no allocated queue element is built. It is 
the responsibility of the requester to 
ensure that the space is freed with a FREE- 
MAIN macro instruction. 


ALLOCATING AND FREEING PAGES IN A SYSTEM 
WORK AREA 


SWA (system work area) segments are 
created, one per request, in the highest 
addressed segments available in the page- 
able dynamic area. The segments are 
created by the GETSWA routine when proces- 
Sing SVC 4 GETMAIN requests for subpool 236 
(see Diagram 6.20). 


The system requests SWA pages by issuing 
an SVC 10 GETMAIN for subpool 237. This 
causes the GETPAGE virtual storage supervi- 
sion routine to allocate page-size blocks 
to the system from an existing SWA segment 
(see Diagram 6.21). 


Allocation of space within the SWA is 
controlled by a SWAB (system work area 
block) which contains a bit map represent- 
ing the 16 pages of the SWA segment. There 
is one SWAB for each SWA segment. The 
SWABs are chained on the SWAH (system work 
area header) from the most recently allo- 
cated SWAB to the oldest. The GETPAGE 
function allocates pages from the SWAs by 
searching the chain of SWABs (see Figure 
6-4). If there are no pages left for allo- 
cation, the scheduler is notified by return 
code. 


The system frees pages in the SWA when 
they are no longer needed by issuing an SVC 
10 FREEMAIN for subpool 237. The FREEPAGE 
routine notifies the system whenever a seg- 
ment of SWA has become completely free (see 
Diagram 6.39). The system frees SWA seg- 
ments by issuing an SVC 10 FREEMAIN for 
subpool 236 (see Diagram 6.38). 
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Pageable Dynamic Area 
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Control blocks used to alloc- 
ate storage in the system work 
area. 


Figure 6-4. 


ALLOCATING AND FREEING QUICKCELLS 


(See Diagrams 6.12, 6.13, and 6.37) 
Quickcells are small blocks of storage 
in the SQA (subpool 245) and the LSQAs 
(subpool 255) that can be allocated quickly 
and that are expected to be used over and 


over again for short periods of time. 


A gquickcell can range in size from 8 to 
256 bytes, but must be a multiple of 8 
bytes. The number and sizes of the quick- 
cells are defined at system generation and 
can be changed during nucleus 
initialization. 


The guickcell area in the SQA and in 
each LSQA is described by a QCDBLK (quick- 
cell descriptor block) which contains a 
QCDE (quickcell descriptor entry) for each 
quickcell. The QCDBLB for SQA quickcells 
is built in the SQA during nucleus initia- 
lization. The QCDBLK for an LSQA quickcell 
area is built in the LSQA when the LSQA is 
allocated (see Diagram 6.12). 


Quickcells can be allocated and released 
faster than normal SQA and LSQA storage. 
When GETMAIN and FREEMAIN routines process 
a reguest for a block of storage from sub- 
pool 245 or 255 that is explicitly 
requested from quickcells, the routines 
bypass the normal search and updating of 
the storage control blocks and use a spe- 
cial branch entry (QCBRANCH) to satisfy the 
request. 


To allocate a quickcell, instead of 


searching the FQE queue, QOCBRANCH indexes 
directly into the bit map in the appropri- 


HOu 


ate QCDBLK to determine whether a quickcell 
is available to satisfy the request. If it 
finds a guickcell, it marks it allocated 
and passes its address to the caller. Ifa 
quickcell for the length requested is not 
available, the request is processed like a 
normal request for storage in the SQA or 
ISCA. 


To free a quickcell, QCBRANCH simply 
finds the quickcell entry that matches the 
address to be freed and marks the entry 
available for allocation. 


Each GETMAIN quickcell request must 
result in one FREEMAIN request for the 
whole amount and not two or three FREEMAIN 
requests, each for part of the space. For 
example, a request for 80 bytes must result 
in a FREEMAIN of 80 bytes and not a FREE- 
WAIN of 40 and another of 40. 


SUPERVISING EXTERNAL PAGE STORAGE 
(See Diagrams 6.23, 6.24, and 6.40) 


NIP (the nucleus initialization program) 
calculates the total amount of external 
fage storage needed for the system and the 
number of external pages available for 
allocation. It places the count of all 
external pages available for allocation in 
the “total uncommitted" field and the “sys- 
tem uncommitted" field of the PVT (page 
vector table). The “total uncommitted" 
field contains a constant value while the 
“system uncommitted" field varies as 
external pages are allocated and freed. 


NIP initializes the “batch committed" 
and “TSO committed" fields in the PVT to 
zero and sets the maximum TSO and maxinrum 
katch processing threshold counts as speci- 
fied by the operator (see the OS/VS IPL and 
NIP Logic manual). 


As Eatch joks for V=V regions are 
initiated, the GETPART routine allocates 
the regions. GETPART assigns a virtual 
storage region fox the job and ensures that 
there is an external page to back uf each 
virtual page (that is, if the virtual 
region size for the batch job is 128K, 
there must be 32 pages of external page 
storage available). The GETPART routine 
decrements the “system uncommitted" count 
and increments the “batch committed" count 
ky the numker of pages assigned to the 
region (see Diagrams 6.23 and 6.40). 


For TSO tasks, the external page storage 
counters are incremented by a percentage of 
the amount of virtual storage assigned. A 
logon buffer is used to predict whether 
sufficient external pages are availakle to 
allow a new TSO user to enter the system. 
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If not enough external pages are available, 
no new TSO jobs are initialized. 


Batch jobs, once initiated, should not 
run out of external pages since they are 
guaranteed 100 per cent back-up of virtual 
storage with external page storage. Howev- 
er, only a fraction of the TSO user's vir- 
tual storage requirement is backed up by 
external page storage. Consequently, a 
count iS maintained of the pages used by 
TSO users. If time sharing jobs exceed the 
amount of external page storage that can be 
used, they are terminated. 


GETPART reserves an area in external 
page storage to guarantee that a TSO task 
can be swapped out to external page 
storage. This TSO buffer is large enough 
to accommodate any TSO task in real storage 
that may be forced to log off, thus ensur- 
ing that the sSwap-out operation will not 
require use of external page storage that 
is committed to batch jobs (see Diagrams 
6.24 and 6.40). 


ALLOCATING SPACE FOR A REGION 
(See Diagrams 6.14 through 6.19) 


When an initiator issues a GETMAIN macro 
instruction for subpool 242 or 247, storage 
is obtained from the area represented by 
either the V=R PQE or V=V PQE respectively. 
A new PQE and an FBQE are created in the 
LSQA for the new region. The address of 
the PQE is inserted in the job step‘s TCB. 


The routine that obtains regions upon 
request is the GETPART routine. The GETPART 
routine is invoked by either a register- 
form GETMAIN (SVC 10) request (always an 
unconditional single-region request) or a 
list-form GETMAIN (SVC 4) ECB-mode request. 
The ECB-mode GETPART request applies to the 
conditional form of single-region and 
split-region list requests. An ECB is con- 
tained in the requester's JSCB (job step 
control block). This type of request 
enables a job to be canceled when it cannot 
be initialized because sufficient storage 
Space is not available. The ECB-mode GET- 
PART request must be used when requesting 
Space for nonpageable region or for a spe- 
cific (checkpoint/restart) pageable region. 


Space for regions is obtained from the 
dynamic area of virtual storage. (See 
figures 6-5 and 6-6.) The PQEPTR field at 
offset 8 in location GOVRFLB contains the 
address of a two-word DPQE (dummy partition 
queue element) less eight bytes. The first 
word of the DPQE contains the address of 
the V=R PQE (partition queue element). 
second word of the DPQE contains the 
address of the V=V PQE (see Figure 6-2). 


The 
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4p These arrows indicate the direction (high to low or low to high) in 
which storage addresses are allocated for the respective areas. 


Figure 6-5. Virtual storage after alloca- 


tion of an LSQA and region for 
one pageable (V=V) task. 
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Notes: 
These arrows show the direction (high to low or low to high) in which 
addresses are allocated for the respective areas. 


*Nonpageable regions are assigned from the lowest-addressed 
contiguous space available in the nonpageable dynamic area that 
meets the specified size required for the region. Nonpageable 
regions are started on page (4K) boundaries and the region size 
specified is rounded upward to a page multiple. 


Figure 6-6. Virtual storage after alloca- 
tion of LSQAsS and regions for 
one pageable task and one non- 


pageakle task. 


The first and second words of the PQE 
point to the first and last FBQEs (free 
klock queue elements) associated with the 
area of storage described by the PQE. 
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FBQES contain a count of the number of free 
bytes available in that block of storage. 
FBQEs are chained forward and backward in 
address order so that virtual storage 
supervision routines can scan them from 
either high-to-low address or low-to-high 
address. 


Before allocating a region, a VSS rou- 
tine (CKTHRESH) checks whether the paging 
supervisor has sufficient resources avail- 
able to service the size region requested. 
If not, control is returned to the caller 
with the request unsatisfied. 


To assign a nonspecific region, the GET- 
PART routine searches for the lowest block 
of free storage in the dynamic area large 
enough to satisfy the request. For a spe- 
cific region request, it searches for the 
block that includes the region requested. 


For each region, the GETPART routine 
builds an FBQE, a DPQE, and a PQE in the 
requester's local system queue area. It 
places in the FBQE a count of the conti- 
guous free bytes that can be allocated in 
the regicn. It puts the address of the 
FBQE in the PQE and the address of the PQE 
in both fields of the DPQE (see Figure 6-8). 


The GETPART routine also places the size 
of the region and the region address in the 
PQE and places the address of the dummy PQE 
Minus eight bytes in the TCBPQE field of 
the requester‘'s job-step TCB. The GETPART 
routine also establishes subpool 252 when a 
nonspecific region is obtained, to reserve 
a minimum of 4K minus 8 bytes, so that pro- 
grams in supervisor state and protection 
key 0 can obtain storage in the region. 


Region Reference-Validity Map 


All user virtual storage regions have 
the same storage protection key. Storage 
protection between regions is provided by 
segment invalidation. Channel references, 
however, are not protected by segment inva- 
lidation; therefore, any channel reference 
requested by a non-key-0 program must be 
checked to ensure that the reference is 
valid. For this purpose, a table is built 
by the GETPART routine to define those vir- 
tual addresses that may be referenced by a 
non-key-0 program in a virtual storage 
region. This table is called the region 
reference-validity map. 


The region reference-validity map is 
constructed at the end of the dummy PQE 
when the GETPART routine allocates a 
region. The map consists of eight-byte 
elements, each containing the starting and 
ending address of a portion of storage that 
May be referenced by a task in the asso- 
ciated region. The addresses are placed in 
the map in ascending order. The storage 
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described by the elements in the map are 
the nucleus, region, LSQA, and the area 
from the beginning of the LPA directory to 
the last addressable byte of virtual 
storage (the high address of the SQA). 
These storage areas are the only ones that 
May be referenced by the task. 


Figure 6-7 illustrates the region 
reference-validity map. 


ALLOCATING SPACE WITHIN A REGION 


Any GETMAIN macro instruction in which 
subpools 0-127, 239, 240, 250, 251, or 252 
are specified indicates that space within 
an existing region is desired. 


Supervision of storage within a region 
aS accomplished by using control block 
queues that originate from two fields in 
the TCB (task control block). MTCBMSS 
FOints to the SPQE (subpool queue element) 
queue, which describes allocated areas of 
storage within a region. TCBPQE points to 
the DPQE (dummy partition queue element) 
which points to the PQE (partition queue 
element) queue which, with the FBQEs (free 
klock queue elements), describes unallo- 
cated areas of storage within a region. 


TCB 


Dummy PQE 


Address of Address of 
First PQE Last PQE 


Address ] Address? 


00 Address3 Lo Address 4 
00 Address 5 Ll Address b 
| 80 | Add ress = Address 8 


Region Reference- 


Validity Map 


reserved for TSO 


use. 





} One entry is 


Note: The addresses in the region reference-validity map are arranged 
sequentially from the lowest address to the highest and they all start on 
segment boundaries. 


Figure 6-7. Format of the region 


reference-validity map. 


2 


c 


Nor 


Management of Unallocated Storage Within a 
Region 


There is one PQE per region. It is 
created when space for the region is allo- 
cated. Each PQE contains pointers to both 
ends of a two-way chain of FBQEs (free 
block queue elements) which describe 4k 
blocks (pages) of available storage space 
within a region. There may be any number 
of FBQEs for one region. Each FBQE con- 
tains three pointers, one to the free area 
that FBQE describes, one to the next-higher 
FBQE on the chain, and one to the next- 
lower FBQE. Each FBQE also includes a 
field that contains the number of bytes of 
free storage it represents. This count 
field is always a multiple of 4K. 


Immediately after a region has been 
created, there is only one FBQE represent- 
ing all the available space. All subse- 
quent GETMAIN requests for subpool numbers 
issued within this region are satisfied 
from the space allocated for the region. 
The space is taken from that described by 
the FBQE for the region and is assigned the 
subpool number identified in the GETMAIN 
macro instruction. 


Figure 6-8 illustrates the control block 
queues used to manage unallocated storage 
in a region. 


Supervision of Allocated Space Within a 
Region 


When a GETMAIN macro instruction is 
executed, the VSS routines search the list 
of SPQEs (subpool queue elements) whose 
origin is in the TCB field TCBMSS (see 
Figure 6-9). Each SPQE anchors the control 
blocks that describe the space associated 
with an existing subpool number. If an 
SPQE is not found for the subpool 
requested, a new SPQE is created (see Dia- 
gram 6.5). 


Each SPQE contains an identifying number 
(see Figure 6-3), control information that 
indicates whether the subpool is owned 
exclusively by this task or is being shared 
with another, and two pointers. These 
pointers create two chains. One chain is 
composed of other SPQEsS representing other 
subpools. The other chain is a series of 
DQEs (descriptor queue elements) which 
describe blocks of storage within the sub- 
pool. Each DQE describes one or more con- 
tiguous 4K blocks of storage. 


When a processing program issues a GET- 
MAIN request, a series of 4K blocks large 
enough to satisfy the request are allocated 
to the subpool for which the request was 
made. From the amount of 4K blocks of 
storage so obtained, the number of bytes 
asked for in the GETMAIN instruction is 
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Figure 6-8. Control blocks used to manage 
unallocated storage within a 


region. 


subtracted. The remaining space (if any) 
is still available to be allocated to sati- 
sfy another GETMAIN request for the same 
sukpool ky the same task, or by a task that 
is sharing the same subfrocol. A FQE (free 
queue element) is used to describe the 
unallocated (and still available) storage 
within the space defined by a DQE. (See 
Figure 6-9 for an illustration of these 
queues.) 


Processing the Initial Request for Subpool 
Space 


Each time a request for space is 
received, the chain of SPQEs is scanned Ly 
the GETMAIN routines to determine whether 
the requested subpool exists. When the 
initial request for a particular subpool is 
received, the GETMAIN routines build a SPQE 
(subpool queue element) in the local system 
queue area. The SPQE contains the subpool 
number and, if other subpools exist, a 
fointer to another SPQE. (See Diagram 
6.5.) 


The GETMAIN routines also build a DQE 
(descriptor queue element) in the local 
system queue area, and place the address of 
the DQE in the subpool queue element. The 


Virtual Storage Supervision 407 





SPQEs head chains of 
DQEs describing 
allocated space within a 





~~ -. : 
Se ae EY & i 


Led 8 eee = 
Bx ot i as v 
SPDQEAD a er ey 
DQE DQE 
—-— DQEs describe allocated 
pas 
DQFQEPTR Ss, Pav tagien S : blocks of continuous 
i DQEPTR DQEPTR storage that is assigned 
DQEBLKAD to a subpool in multiples 
of 4K. 
ache eS —— —— FQEs describe free space 
ie ihe “PCP? is ay within a region. 








FQEPTR 
ROR. ee ESS, 


Dalat > >. Sera -Te 
FQAREA 
FQELNTH 





FQELNTH 


High Address 


4K Multiple 


| 


Low Address 
Figure 6-9. Control blocks used to super- 
vise allocated storage within 
a region. 


DQE contains a count of the number of bytes 
of storage allocated to a block in the sub- 
pool (space within regions is assigned to 
subpools in multiples of 4K-byte blocks). 


If any free space exists within the 4K- 
byte blocks defined by a DQE, a GETMAIN 
routine builds an FQE (free queue element) 
within the LSQA and places in it a count of 
the number of bytes available and the 
address of the highest byte +1 of the free 
Space. All such FQEs for one contiguous 
area are chained together. The address of 
the first such FQE is placed into the asso- 
Ciated DOE. 


Processing Subsequent Requests for Subpool 
Space 


When a GETMAIN request is issued for an 
already existing subpool (identified by an 
SPQE), a check is made to see if a DOE 
exists. (If a FREEMAIN had been issued for 
the entire subpool, an SPQE would remain, 
but there would be no DQE.) If there is no 
DOE, a new one is built as described in the 
preceding topic “Processing the Initial 
Request for Subpool Space". If there is a 
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DQE, the FQE queue associated with the sub- 
fool is searched (see Diagram 6.7) and the 
request is satisfied from the free space 
within the subpool, if possible. If the 
request cannot be satisfied in this way, 
additional space is allocated (in multiples 
of 4K-byte blocks) to the subpool. The 
Space is obtained from the free area 
described by FBQEs. The amount of storage 
obtained is represented by a DQE and one 
(or more) FQEsS within the specified subk- 
fool. The number of bytes allocated is 
subtracted from the FBQE for the area from 
which storage was obtained, and the FBQE 
pointer is relocated if necessary. All 
CQEsS representing space in the same subpool 
are chained together. 


For nonpageable tasks, the storage pro- 
tection key of the requesting task is 
assigned to the allocated storage and the 
Storage is fetch-protected as each 4K-byte 
block is assigned. Then, when each Flock 
is freed, its storage protection key is 
reset to zero. 


For pageakle regions, the protection key 
and fetch protection are set in the extern- 
al page table as each 4K-byte block is 
asSigned, and the block is marked assigned 
to GETMAIN. Then, when the block is paged 
into real storage, the page is assigned the 
storage protection key and fetch protection 
ky the paging supervisor. When a page is 
freed, it is released from both real and 
external page storage and an indication 
that the page no longer exists is set in 
the page table. 


After space is assigned, storage usage 
information is recorded (see “Recording 
Storage Useage Information" below). Final- 
ly, the GETMAIN routines place the address 
of the assigned space into register 1 if an 
Svc 10 instruction caused entry, or place 
the address into the location specified by 
the requester if an SVC 4 instruction 
caused entry. 


Processing if the Requested Space is not 
Availakle 


If there is not enough free space in the 
region to satisfy a request, the CDPURGE 
routine attempts to purge one or more 
unused modules in the requester'‘s region 
(see Diagram 6.9). The space freed ry this 
purge may be sufficient to satisfy the cur- 
rent request. 


If the purge flag (TCBJPQF) is set in 
the TCBJPQ field of the job-step TCB, the 
CDPURGE routine examines all CDEs (contents 
directory entries) in the job pack queue. 
Each CDE that has the "release" flag 
(CDREL) set in its attributes field repre- 
sents a module in the region that is no 
longer needed (that is, there are no out- 





J 


J 


standing requests for the module by any 
routine in the job step.) For each such 
module, the CDPURGE routine branches to the 
CDDESTRY routine (in CDEXIT) to dequeue the 
CDE and free the associated module and its 
extent list. 


After all CDEs in the region's job pack 
queue have been examined and all unused 
modules purged, and if the module purge has 
freed enough space to satisfy the request, 
the GETMAIN routines allocate the needed 
Space to the requester'‘s task, then return 
control to the requester. 


RECORDING STORAGE USAGE INFORMATION 
(See Diagram 6.10.) 


The SMF Storage routine checks to deter- 
mine whether an initiator has indicated 
that SMF recording should be performed, and 
then checks the TCB for the address of the 
TCT (timing control takle). If there is no 
TcT, SMF storage information is not being 
recorded for this task. If there is a TCT, 
the SMF Storage routine performs the fol- 
lowing functions for subpools 0-127 and 
250-252: 


e It determines whether the newly allo- 
cated storage exceeds either the "“low- 
water mark” (LWM) or the “high-water 
mark" (HWM) for the region. The LWM is 
the address of the highest storage 
address allocated from the bottom of 
the region, and the HWM is the address 
of the lowest storage address allocated 
from the top of the region. If either 
is exceeded, the SMF Storage routine 
stores a new value in the TCT. 


e It calculates the difference, in terms 
of 4K-byte blocks, between the LWM and 
HWM. A record of the mininumr value for 
this difference is kept in the TCT. If 
the new allocation or release creates a 
new minimum, the SMF Storage routine 
records the new minimum difference in 
the TCT. 


FREEMAIN ROUTINES 
(See Diagram 6.27.) 


The FREEMAIN routines service the FREE- 
MAIN macro instruction, which is used to 
free space when it is no longer needed. 
Space assigned to a region, space within a 
region, space in a system work area, space 
in a local system queue area, or space in 
the system queue area may be freed. Basic- 
ally, the FREEMAIN routines combine space 
being freed with existing free space or, if 
the adjacent space is not free, build new 
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control blocks and add them to the appro- 
priate queues of free blocks. 


Freeing the Entire Space Assigned to a 
Region 


The FREEPART function is invoked by a 
register-type FREEMAIN request (SVC10) or 
ky a branch to RMBRANCH to release space 
from subpool 242 (V=R) or subpool 247 
(V=V). 


To free a region, the TCBPQE field of 
the TCB that represents the task for which 
the region is being used is checked to 
determine the address of the partition 
gueue element for the reqion. The dummy 
PQE and region reference-validity map are 
cleared first. Then the space occupied by 
the PQE is released (see “Freeing Space in 
an LSQA or the SQA" below). Next, if the 
region to be freed is adjacent to an exist- 
ing free area, it is combined with that 
area. This is done by adding the number of 
bytes in the region being freed to the size 
field of the free block queue element for 
the existing free area and, if necessary, 
changing the FBQE to point to the beginning 
cf the newly enlarged free area. 


If a region being freed is not adjacent 
to a free area, the FREEMAIN routines build 
an FBQE for the area and add it to the 
chain of FBQEs that represents all space 
available for allocation as regions. 


The FREEPART routine also frees the 
eight Eytes in subpool 252 obtained by the 
GETPART routine. 


Freeing Space Within a Region 
(See Diagram 6.29.) 


To free space within a region, the SPQE 
(subpool queue element) representing the 
sukpool from which space is to be freed is 
located. The address of the SPQE queue is 
in the TCBMSS field of the task control 
block for the task to which the space is 
assigned. The DQE (descriptor queue ele- 
ment) that represents the area in which the 
space is to ke freed is located. Next, the 
two FQEs (free queue elements) between 
which the space exists are located and a 
new FQE is constructed to represent the 
newly freed space. This FQE is either 
added to the chain of FQEs or, if the space 
lies adjacent to another free area, is com- 
bined with the FQE of the adjacent free 
area (see Diagram 6.35). 


A test is then made to determine whether 
the resulting free area contains any free 
4uK-byte Lklocks that begin on a page boun- 
dary. If it does, and the block is adja- 
cent to an existing free 4K-byte block, the 
number of bytes to be freed is added to the 
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count field in the FBQE representing the 
existing free space and the space is 
cleared. (See Diagram 6.34.) 


For a nonpageable task, the protection 
keys of the released blocks are set to 
zero, with fetch protection on. Fcr page- 
able tasks, the page table entries for the 
released blocks are marked not assigned and 
the storage key in the external page table 
entries are set to zero. 


If the block being freed is not adjacent 
to a free 4K-byte Elock, a new FBQE is con- 
structed and paging supervisor references 
to the pages are deleted. The number-of- 
bytes count in the appropriate DQE is then 
decremented to reflect the storage being 
removed from the subpool. When this count 
reaches zero, the DQE is eliminated. A new 
DOE is created and the old one is updated 
when space in the middle of that described 
by the old DQE is freed. 


The SMF Storage routine (FMSMFCRE) is 
used to maintain storage usage information 
in the TCT (timing control table). (See 


“Recording Storage Usage Information" ear- 
lier in this section.) 


Freeing Space in an LSQA or the SQA 
(See Diagram 6.31.) 


When processing requests to allocate 
Storage in the SQA or an LSQA, fixed real 
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storage is oktained before the request is 
Satisfied. A request of 4K or less is not 
satisfied across page boundaries. When a 
preciously allocated SQA or LSQA rage is 
freed, the real page assigned to it is 
released. 


J 


To free space in the SQA or an LSQA, a 
FREEMAIN routine first locates the DQE 
(descriptor queue element) that represents 
the space. It next checks to determine 
wether space within subpecols 233, 234, 243, 
244, 253, or 254 is to be freed. If so, 
eight bytes are added to the size of the 
area to ke freed (to include the AQE that 
is contained in the area), and eight bytes 
are suktracted from the address of the 
Space. 


For subpool 233, 234, 243, 244, 253, and 
254, the address of the AQE is obtained 
from the TCBAQE field of the associated 
TCB. If the entire area defined by the AQE 
is tc ke freed, the AQE is simply removed 
from the AQE queue. If the lower Loundary 
is heing freed and the upper boundary is 
not, or if space in-between is being freed, 
a new AQE is created for the remaining 
storage. Otherwise, the byte count of the 
Original AQE is reduced by the amount of 
storage being freed. Any resulting conti- 
guous free areas are combined by combining 
FQES. 
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gives ccntrol to GLIST1 (see step 9). All successive 
entries to the Common routine fren GLIST1 are wade at 


4 
| 
| 
| 
| 
| 
| 
| GMCCMMCN|GMCCMM1 
| 
| 
| 
GCOMM4 to eliminate the surpool check. When ali entries| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
rs 


[GLIST 


have been processed, tne Ccmiron reutine iS entered at 
GCCMM5 to return to tne caller. 


GMCCMMON | GYCOMM4 
GS PCHK 


CSPCHK returns tne address cf the SPOF if cne exists. 
If there is none, the GEIMAIN Common routine branches 
to GSPCESPC to create Cne. 


GSPQESFC 


The GETMAIN Common routine branches to GPLDACE tv 
buil’ an allocated queues element for subpool 243, 244, 
253, and 254 reguests. 


GEBLDAQE 


9th 


Input 


Register 10 


Register 12 


Subpool number and 
type 


Register 14 


From GLIST when 
last enty has been 
processed, 

From GNOTSAT 
6.25, Step 6. 








Diagram 6.2 (Steps 6-10) 
Overview of Allocating Storage 


Processing 


If page boundary request, obtain storage G4KSRCH 


from FBQE area. Get storage ona 
page boundary. 
6.22 


If request is for more than the largest 


possible FQE size: GAKSRCH 


e Obtain storage from FBQE area. Obtain 4K or more 
storage. 


6.22 


GNOTSATB 


Retry at GMREPEAT, 
6.25 


e If space could not be found, save the 
address of largest area available. 


If request is less than or equal to the 
largest possible FQE size: 


GFRECORE 


@ Search FQE queue. Search FQEs for 
free space. 


@ If space not found =e 7 


e Allocate space described by the 


FQE found. GFQEUPDT 


Reduce size of 
free block. 


GLISTI 


Process next element 
of list request. 


If this is a list request 


GCOMM7 
GCOMMS5 


Output 


Return. Calle 


Register 15 


Return code=X'00' 
Successful allocation 





8Th 


Diagram 6.3 
Processing Subpools 
From GMCOMMON or FACOMMON : 
to locate and check a subpool queue Processing (A) 
element. 
CSPCHK 
Input -—tT 1 If problem program subpool, search SPQE queue for the subpool number 


and pass its address to the requester. Calling Routine 


Output 


Registet'= 2 Check the validity of the subpool, change its number if necessary, and 
Address of TCB route processing control per subpoo! number as follows: 


SUBPOOL 
Register 12 NUMBER ACTION EXIT 
SuPpcel number Se ka If branch entry save registers. Exit. (8) 


TCB Change to 253, indicate AQE needed, process like 255. a) 


234 Change to 254, indicate AQE needed, use job-step TCB, 
Job-step TCB process like 255. 


Change to 255 and process like 255, | 
i TCBMSS 


a _______®o 
TCBLSQAP 
cz Error condition (11); Subpool not assigned. = 7 





SPQE for requested 
subpool returned 
or 


















An indication that 
the SPQE was not 
found 


IEAVPRTO 


Monitor external 
page storage. 





6.24, 6.40 





IEAPGSWA 


6.20, 6.21 





, 6.38, 6.39 


Error condition (11); Subpoo! not assigned. 


ao eo) 
Change to subpool 245 and process like 245. ie el 


If branch entry save registers. Exit. >(E) | 


| 243 Indicate AQE needed, process like 245, —— 


Indicate AQE needed, pick up job-step TCB, process like 245. 


| 24d 
Cm [ewmncncen BOG) 
a Error condition (11); subpool not assigned. =>(0) 
Ca fetes OO 
a femcnnas B® 
Ed 


GERROR 


Prepare ABEND or 
ABTERM exit. 


6.26 





IEAVPRTO 


Allocate or free a 
region. 


6.14, 6.33 








If free branch entry, save registers. Exit. 


= Change to subpool 0, process like a problem program request. = 
Pick up job-step TCB and process like a problem program 
request, 


Indicate AQE needed, then process like 255. 


Indicate AQE needed, use job-step TCB, then process 
like 255. 

Pick up LSQA SPQE if it exists. Otherwise, use 
SQA SPQE. Return to caller. 





IEAPLSQA 


Allocate or free 
LSQA segments. 


6.11, 6.32 
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Diagram 6.3 Processing Subpcois (Module IEAVGMO00) 
CS Sa Sat Sse SSS = Tosa eas ee 
| | ROUTINE 
| NOTES | NAME 
}--—-------~---------—------~----------~-------+~---+-------------4-------- 
{ 1 If the requester is key 0 or in supervisor state, the | CSPCHK 
| subpool number is changed so that protected storage will| 
| be obtained. 
| 
| 
| 
| 
| 


| 
2 Checks are made for two additicnal error conditions; a | 
subpool number between 128 ard 233, and a request for a | 
subpeool numker greater than 233 for a nonsupervisor | 
State program in Key 0. | 

1 


> 


-——— —- — —_ — —+—— 4 


Och 


Diagram 6.4 
Allocating Storage for Control Blocks 


Branch entry to allocate 
storage for contro! blocks 







Processing 


Input 


Register | GETMAINB 


Length and subpoo! number K—-4—- — — ~ — —— — — — — — — 1. Obtain SPQE. 


From GNOTSATA 
Diagram 6.25 GMBRETRY 














GFRECORE 























Step | 
Allocate storage of requested size. Search FQEs. 
Register 14 6.7 
Return address ora 
l 
| GNOTSATA 
SPQE for SQA 
GOVRFLB | 3 > If storage could not be obtained. Retry the 
l request. 
! 6.25 
| 
| GFQEUPDT 
| Update FQE for assigned area, 
| me g Output 
SPQE for LSQA | 
Register |] 
See ek tie ees ae Zero out storage. Address of assigned area 


To Caller 


TCBLSQAP 


— ? . 
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Diagram 6.4 Allocating Storage for Control Blocks (Module IEAVGM00O) 


CS St ee a re eo ee eg ee ee A Gakic te cares 9 gra aes 1 
| |RCUTINE | | 
| NOTES | NAME | LABEL | 
Pee ee ee Craik cotta Le te ee eae alee 1 
| This is an internal subroutine used by the virtual stcrage |GETMAINB| | 
| Supervision routines to oktain storage for control blocks | | | 
| in subpool 255 or 245. | | | 
| | | | 
| 2 | GFRECORE| | 
| | | | 
| 3 |GMBRETRY | | 
| | | | 
| 4 | GPFEUPDT | l 
ch hh Ds a A steered at eee fp et Se eee 4 


Diagram 6.5 
Creating an SPQE 


ccn 


From GMCOMMON 6.2, Step 3) 


to create a supboo! queue element 
















Input 


Processing 


Register 4 GSPQESPC 
Address of TCB GETMAINB 
1° Obtain space for the SPQE. Output 
Register 12 a es 


Subpool number - 7 








canes 


Add SPQE to beginning of queve. BRRRBRRRRRRSESECEACEERERR GR 


SPQE 


}SPID 


Place subpool number in the SPQE, 








If this is the only SPQE, indicate 


last on queue. 





Register 7 


Address of SPQE 





6.2, Step 4 


néh 





Diagram 6.6 
Searching FBQEs 


From G4KSRCH (6.22) 
Input to get 4K blocks of region 


a Processing 


FBQSRCHA 






Register 6 


Length requested ee ee 1 Determine the PQE address. 


From IEAVPLSQA or 
IEAVPRTO to FBQSRCH 
obtain storage for 


| 
| 
| an LSGA segment 
| 
| 
| 


Register 12 


Output 





or a region, Search FBQE queue for a block 
From IEAPGSWA i large enough to satisfy the 
to get SWA | request, 
segment. | 
_| | If found, subtract request size 
from FBQE size. MABARRERREERREREEEEEER 
| If not found, return the address 
| of the largest area available. EMAINB 
| 
| If FBQE found is same size as 
| the request, free the FBQE. 6.27 Register 9 
| Address of allocated area 
| Register 6 
Register 1 | Size of allocated area 
| Register 15 
Register | doseatler Size of largest area 
Length requested | (if request not safisfied) 
Register 7 | 
| 





I 
‘First (lowest) Last (highest) 
FBQE FBQE 


FWDPTR 
BCKPTR 
















PQE 
PQEFFBQE 


a to : 
hy 


Pies et, 
in’ 4 Ee 


AS Se 
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Diagram 6.6 Searching FBQES (Module IEAVGMOQ) 


a SS a a aa oa Toes ae eo, Tos oe 1 

| ROUTINE | | 
| NOTES | NAME | LABEL | 
Poa Sa So er eee ee ee : SERRE tassaSra= { 
| 1 When entered at FBQSRCHA fron GUKSRCH te oktain 4K | FBCSRCHA| | 
| multiples cf region space, the search of tne FBQES is | | | 
| made through the backward fointers. | | | 
| | | | 
| BJ When entered at FBQSRCH, register 1 indicates the JFEQSRCH | | 
| direction of the FBQE search. A value of 4 indicates | | | 
| the request is to he satisfied by starting the search | | | 
| with the high addresses. A value of 0 indicates the low| | | 
| addresses are to be searched first. | | 
ERS ey Se Seo ey Pe Ne a ap ee ge ea PRD f eee nee Me ares J 


9c 


From GMCOMMON or GETMAINB 
to search FQE queue. 


;------- 


a FQE Last FQE 


PLPLI 













r-- 


Ue et ett 

















Processing 


GFRECORE 


Search FQE queve and compare 
each FQE length to the length 
requested, If exact size is found, 
end search, 






GMCOMMON 


Allocate 
storage 










2. If it isa region subpool request 








6.2 







3 If the request is an SQA or LSQA 
request, ensure that each page is 
backed up by a real page. 








If the request length is less than 
or equal to page size, ensure that 
the request is not satisfied across 
a page boundary. 






GNOTSATC 


Request not 
satisfied 





5 |f real page cannot be obtained 





6.25 


To Caller 


Diagram 6.7 
Searching FQEs 


Output 


If FQE is Found If FQE Is Not Found 
Register ] Register ] 


Address of | Address of previous FQE | | Address of previous FQE | | Address of last DQE | of last | Address of last DQE | 







Paging Supervisor 





IEAPSQA] 
Register 2 Register 15 


5.8 
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Diagram 6.7 Searching FQFs (Module IEAVGM00) 
Lea a as Se es re ete a eo age mE en ae te eee Te age ep Roe ae me 


7) 


& 


i a i SS 
uo 


The GFRECORE routine searches the FQE queues for the 
requested subpool to find the FCEH that Fest fits the 
length requested. 


For region subpools, the FQE of the requested size or 
the largest availakie FCE (in the case of a variable 
request) is passed back to the requester (G¥COMMCN) 
along with a pointex to the last DQE. 


A series of calls is made to the paging supervisor to 
obtain real pages to back up each gage that will be 
allocated tc satisfy the LSCA cr SQA request. 


ISCA and SGA requests for 4K or less are not satisfied 
across page boundaries. 


lf real pages cannct be cbtained for all the requested 
LSCA cr SQA pases, tacse pages that were obtained are 
cleared and the request is not satisfied. 


a a a Se ee 


[ROUTINE | 
| NAME | 


GFRECORE 


IfAPSQOA 


GFRECCRE 


TRNONPVT 
IEAPSIER 


-—— — — iy 


LABEL 


8oh 


Input 





Diagram 6.8 
Updating FQEs to Allocate Space 


From GMCOMMON or GETMAINB 
to update an FQE. 








Processing 


GFQEUPDT 
















Register so SsDetermine new FQE size. SANE 
= a 
| iam 2 \fsize is zero, remove the FQE Output 
l and, if it isa region FQE, free it. 6.27 
yy, 
| | y 
| AAAARAABRAWARABWAaa daAaaaaaad FQE removed from queue 
L | 
i ] 
Register 1 I | Region FQE 
a = 
[| ee 
EOE | | 3 Otherwise, update the FQE,  WRRARARAUVAVARARRAAYRBA 
ope awe 


| 

| 

FQELNTH = 
SQA or LSQA 


Previous FQE 
<j 





aC 
T———T4 Move SQA FQE or LSQA FQE, AURRRRRRRRRRBBE’ Saaees S 
: * Bas | . , 
= | g eee te” 
4 ; 
s 
s 
s 
y Previous FQE 
Baannngy forme 





5 if an AQE exists, adjust the 
starting address and length to 
be returned. Register 9 


Address of allocated area 


Register 11 


To Caller Length of request 
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Diagram 6.8 Updating FQFs to Allocate Space (Module IFAVGMOC) 


CS ee SS SS SST - = = ToS SHS 1 
| |ROUTINE | | 
| NOTES | NAME | LABEL | 
RS ae ea ee ee eee ieee: See ea eng Passer en 1 
| 1 The new FQE size is equal to the criginal FCE size winus|GFCEUPDT| | 
| the length of the request. | | | 
| | | | 
| 2 If the FCETYPE field in the FQE is equal to X'80', the |FMAINE | | 
| FGF is freed. | | | 
| | | | 
| 3 If the FQE is for a region, cnly the area and length | GFQEFUPDT | | 
| fields must Le modified. | | 

| | | | 
| 4 If the FQE is for an LSQA or SQA, it must be moved to | | | 
| the new free area at the original location mwinus the | | | 
| requested length, and the previous FOE must Le updated | | | 
| to point to the new location. | | | 
| | | | 
| 5 If an AQE was built, eight is added to the starting | | | 
| address of the allccated area and eight is subtracted | | | 
| from the length returned to the caller. | | | 
Mac ae Ne i ha eee te es eas ee ee es ee Reape ranenanee ae 4 


Oen 





Diagram 6.9 
Purging Modules 
From GNOTSAT (when out of storage) 
or from JEAVPRTO (during FREEPART 


processing) to free purgable modules 
in the JPA 







Input Processing 


Register 4 CDPURGE 


Address of TCB 








To Calling Routine's 


1 Address + 4 


If purge flag is not set, return, 


Job Step TCB 
2 Find CDEs that are no longer 


needed. 









CDEs removed from queue 


CDEXIT 


Dequeve 






3 Dequeue these CDEs and free 
the associated modules and 
extent lists. 


If modules were purged, 
return is to the calling 
routine's return address. 


To Caller 


If modules were not purged, 
return is to the calling 


routine's return address + 4, 


CDE 
CDENXT 
epee ae 





CDE 
CDENXT 


aly x = panel : 
rh Py 


“ks 


<p ho 
RAY ty gee 
° * : . . ° = 


2 . eS 
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Diagram 6.9 Purging Mcdules (Module IEAVGM99) 


Fe een eg ee a rn er aed ee ae ie me ae 5 TTR Peas 1 
| ROUTINE | | 
NCTES | NAME | LABEL 
~=~~--~~----~----------~-~------~-------=------------------- f--~---~-}------~-4 
1 The purge flag is in the TCBJPC field cf the TCE. When |CDLPURGE | 
set to X"8C" it indicates that the modules can be |GNOTSAT | 
purged. | LEAVPRTO| 
| 
2 tach CLf that has the "release" flag get in its attri-  |[CLPURGE | 
butes field rerresents a module that no longer is needed| | 
in the region. That is, there are no outstanding { | 
requests for the moijul= vy any routine in the jok ster. | | 
| | 
3 For each module that is no lcnger needed, the CDPURGE |CCEXIT |CDDESTRY 
reutine branches te CLCLESTRY in CDEXIT to dequeue the |GNOTSAT | 
CDE aud tree the asscciated nodule and extent list. | LEAVERTO| 
If return is madve to GNCTSAT with modules purged, the | | 
request is retried. | | 
A a el eae ates Ree a ee Ue enone ce TSN Corwen ar 





cen 


Diagram 6.10 
Updating the TCT 


From G4KSRCH or FACOMMON 
to record storage usage information Processing 





GMSMFCRE 
FMSMFCRE 
Input . 
1 (If recording not active, return 
Register 6 
Address of TCB 2 _silf there is no timing control table. Caller 
Register 9 Output 
Refurnaddrass 3 Determine whether the allocated or freed 
storage causes a change in the "low-water | 
Register 14 mark" or "high-water mark" for the region. Q@3AwAWWaa" ANN) : 
Address of block - 
allocated TCTLWM 
Register 15 g 


am TCTHWM 


4 Determine whether the minimum difference 


is changed; store the new value. NNN AAA AANNANANAA ASN TCTMINC 





1 


roe 
TCBICT 
- > 


ste 
a Caller 


7 


TCTMINC 
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Diagram 6.10 Updating the TCT (Module IEAVGMO0O) 


Pe Sa en ee a a er ee ee 5 ane Sanaa cr ae 1 
| |ROUTINE | | 
| NOTES | NAME | LAPEL | 
Pe ae ee ee ee ee ee 5 sean sce 2 ane { 
1] 2 If there is no TCT, SMF storage information is not |GMEMFCRE | | 
| being recorded for this frogran. | FMSMFCRE| | 
{ [ | | 
| 3 The “low-water mark” is the address cof the highest | | | 
| storage address allocated frem the bottom of the regicn. | | | 
| The “high-water mark" is the address of the lowest | | | 
| Stcrage address allocated from tne top of the region. | | | 
| If either is changed, the new value is recorded in the | | | 
[| ser. | | | 
| | | | 
| 4 Tne difference is calculated in multiples of 2k. |GMSMFCRE | | 
Oh a nN et hss hs ee Beas nee ae ea J 


heh 


Input 


Register 0 


Number of segments _ 


Register 1 


Negative value 


Register 14 


GOVRFLB 


PQEPTR 
QCTABLE 






VVPQEPTR 


NIP-in=progress 





From RMBRANCH or IGCO10 
to allocate and initialize master 
scheduler LSQA or LSQA for a 


task 


| 
| 
p------ 


| 
| 
Pb OME: carne xn eee 


ae 


7 


Diagram 6.11 
Allocating LSQA Segments 






Processing 
IEAPLSQA 
1. Allocate the highest-addressed segments 
available in virtual storage. FBQSRCH 
(When segments are 
Eos Allocate segment. Output not available) 
6.6 
BR 14 Calling Routine Register 15 


(or) 


Type-1 Exit Routine 
(IEAOXEOO) (3.15) 


[ Return code=x'04" | rn code=X'04' 


If segments are not available 


BALR 


Create page tables for the segments. Paging Supervisor 


IEAPTCD 
5.34 
Allocate and fix page frames for each 


virtual LSQA page to contain control BALR Output 


IEAPSQAI 
208 


6.32, Step 2 








If allocation of page frames was not 
successful 


Create and initialize SPQE, DQE, 


and SWAH. 
Assign a quickcell area, if requested |IEAPQCI 
Initialize quickcell 


area | 
TCB, 


Initialize skeleton TCB or master scheduler 
Reserve SVRB if from ATTACH. 








DQEBLKAD 


SWAHEFRST 
SWAHLAST 












(If request 
is from ATTACH) 












TCB SVRB 
Build an FQE for the LSQA segments. Ly last 
Calling Routine aes ce 
(or) 
Type-1 Exit Routine 
(IEAOXEOO) (3.15) Ra eg 


TCBRBP 


iE tee 


TCBOLSQA 


TCBSWA 











FQE 
FQEPTR 
FQELNTH 


Register 15 


Return code=X'00' 
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Diagram 6.11 Allocating LSQA Segments (Module IFAPLSCA) 


Re SN eas Re we et enn ay De oN ay Ye Pate he a Se Meee ee ee ey Lo 
| RCUTINE 


ere ea ee ee ee Oe ee se ee ee nn nn ws ee ee ee ee se nnn a ee ee es | nn es se 


2 control is returned to the Type-1 Exit routire if the 


branch entry switcn (OBFRSW) is cff. 


The Create/Destroy Page Table routine of the paging 


supervisor is used to create the page tables and to 
initialize segment table entries fcr the allccated 


The SQA/LSQA allocation subroutine of the paging 


supervisor fixes page frames in real storage to Lack up 
each allocated virtual LSQA fage. 


NOTES 
1 
3 
segments. 
4 
6 
Control Field 
Block Name 
SPOE SPQEPTR 
SPQEID 
SPDQGEPTR 
[CGE DOFQLFTR 
DOEPTR* 
DQEBLKAD 
DQELNTH 
SWAH SWAHFRS1 
SWAHLAST 


Dec. 
Disp. 


1 
4 
5 
0 


Or 


12 
0 
4 


Bytes 


ERPRPW 


fe 


4 
4 
4 


The control Elocks are initialized as follows: 


Initiaiized 

to 

Zero 

X'FF* 

LSQA [COQF address 

LSQA FCE address 
for LSQA 

QCDBLK address 

LSQA address tor 
first segment 

Size cf LSQA 
Zero 

zero 


*when initializing the CCEPTR field, the routine first 


checks the value in OCTABLE (in GOVRFLB). 


(indicating that no LSGA guickcells have been 
requested), the routine sets the DQEPTR field to zero. 
Otherwise, the routine calculates the address at which 
the ¢CCEBLK is to be tuilt and stores it in DCEPTR. 


8 No TCB is assigned if the request is a master scheduler 
LSQA request; the fields are singly filled in. If the 
request is not for the master scheduler, an SVRB is 


reserved. 


If it is zero 


IEAPLSQA| INITLSQA 


IEAPSQA1| 


fm a me 


Qs ce a a a a a a ee ee ee Se 


9Ef 


From supervisor initialization program 
to initialize SQA quickcells from 
IEAPLSQA to initialize LSQA quickcells 


Processing 


IEAPQCI 

















QCDATA 








1. Move quickcell sizes and counts 
from data block to descriptor 
entries. 


Initialize status bits in each quickcell 
descriptor entry. 


Set quickcell limits, size, and origin 
fields in the QCDBLK. 





To Caller 


Diagram 6.12 
Initializing LSQA Quickcell Areas 


Output 


QCDBLK 


QCSTATUS 
QCOFFSET 
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Diagram 6.12 Initializing LSVA Guickcells Areas (Module IFAPLSQA) 
Pape cae spy eee Pa or A Avy eRe ne ay Py Seale OEy SM IRE ert Mer oP oe SS 


r 


f 


a1 The first word of the guickcell data area, pointed to 


ee ee 


|ROUTINE 
NOTES | NAME 


em ee ee a a a ae ee ee ae a ae ee 


| LEAPQCI 
by the VCTABLE fieid of GOVRELE, ccntains the count cf | 
tne bytes needed for the quickcell area. Following | 
this, the data area consists of a series of halfword | 
entries, each descrikting a quickcell area and the number | 
of celis reserved for that size, with the last entry | 
being a dumiry having zero in the first byte. The caller| 
must place the address at which the guickcell descrirter| 
biock (GCDBLK) is to ke kEuilt in the DQEPTR field cf the| 
DCF ana paSs the address of the [TQF in register 1. | 


| 
| 
| 
| 
i 
| 
| 
| 
1 
| 
| 
| 
| 
! 
| 
| 
I 
| 
! 
I 
i 
| 
I 
} 
1 
| 
i 
| 
| 
! 
I 
| 
| 
| 
| 
I 
I 
i 
1 
| 
\ 
| 
| 
{ 
' 
! 
] 
| 
! 
| 
I 
I 
! 
I 
l 
| 
! 
| 
| 
Fk 
| 
1 
! 
| 
! 
I 
| 
| 
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Diagram 6.13 


Allocating a Quickcell 
From QCBRANCH to allocate 


or release a quickcell 


Input Processing 


QCALLOC 


Register 0 


Subpool number and 
length 


Register | 


Negative to get a 
quickcell 


Register 3 


Address of CVT 


Register 4 
Address of TCB 


Register 14 


* 
%- : = 
ie ae 


TCBLSQAP 


GCOMM4 


Normal GETMAIN 
6.2 






If there is no quickcell descriptor block, 
treat like a normal SQA or LSQA request. 


Compare length requested with limits of 
quickcells. 


If outside of limits, handle like a normal 
SQA or LSQA request. 


If request is to free a quickcell. 6.37 Step 1 Poe i rs 
Determine the address of the QCDE for 
the requested length. EEEEREEREEEREEEEEEREEE EERE YN QCSTATUS 


3S 


If the quickcell is available, allocate it 
and return its address to the caller. 





Register 1 
eee Address of allocated quickcell 


Determine address of next quickcell of 
requested size. 







GCOMM4 
7 (If there are no more quickcells of the 


requested size, handle like a norma! SQA 
or LSQA request. 


Otherwise, check next quickcell. SSeS 5 
| 
GOVRFLB aes . 


Normal GETMAIN 
6.2 
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Diagram 6.13 Allocating a Quickcell (Module IEAVGKN00) 

De a a a ae a ee a ee ee Ao oe —T 

| [ROUTINE | 

| NOTES | NAME | LABEL 

| 5 -—------------------------------------------------------ +------- —+------ — 

nt The SQA and LSQA gquickcell areas are each described by a| 
quickcell descriptor block (QCICBLK). The QCLBLK for SQA| 
quickcells is built in the SQA during supervisor initia-| 
lization. The QCDBLK for LSCA gquickcells is built when 
the LSQA is allocated (see Diagram 6.12). 


a as ce cc ee es ce ee es ee abe ee 


1 The routine obtains the address of the QCDBIK from the 
DQEPTR field of the LSGA or SQA DQE for subpcols 255 and 
245 respectively. If the task has no LSQA, subpool 255 
requests are diverted to the SQA by changing the sukfool 
number to 245 and the QCDBLK address to zero. Such 
requests are treated like normal SQA requests not like 
quickcell requests. 


QCALLCC 


2 The length passed in register 1 is compared to the 
OCLIMITS field which indicates the largest quickcell 
length in the set. 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 3 The address of the QCDE for the requested length is 

| determined as follows: 

| 

| Address of QCDE = Address of first QCDEF + (length-8) /2 
| 

| 4 The QCSTATUS field indicates whether the quickcell is 
| 
| 
| 
| 
| 
| 
| 
| 
\ 
| 
| 
| 
L 


available for allocation. The address of the first 
quickcell is determined as follows: 


First quickcell address = QCORIGIN+QCOFFSET 


5 The address of the next quickcell for the requested 
length is calculated by adding the request length to the 
previous quickcell address. 


G6 Each time a quickcell of the specified length is checked 
for availability, a counter is decremented which, when 
zero, indicates they have all heen checked. 


-—— a a a a a en en 8 OE ES OO OO 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
i 


Ont 








e Diagram 6.14 (Steps 1-5) 
Allocating a Region 
From |EAVGMO0O0 


to allocate region 


Input space Processing 


JEAVPRTO - This routine can be invoked by issuance of 
Register 0 (if SVC 10) either an SVC 4 (list) or SVC 10 (register) form of the 
GETMAIN macro instruction for subpool! 242 or 247, Output To 6.19 


Subpool number and 


| 
I 
a 


region size 
—7 i — eve 1 If a previous GETPART specific request 


is waiting to be processed Eo Return code=X'04! 


Register 1 (if SVC 4) 


Address of 








1 
| 
| 
| 
parameter list ~~ es 
I sep5 Outputs, carter 
Register 4 | SS SS 2 Calculate region size, 
I 
| ae 3 If size is invalid Return code=X'08' 
| 
4 Caller 
| 4 Determine whether there are enough system 
| resources available for this region request. CK THRESH 
| Check resources. 
| 
| If not, 6.1%, Step 1 
Es = 5 Determine the type of request: 
GETMAIN 
Paramater 
; ifi 6.15, °5t 
Request | Subpool List Sec eee 
code number e Nonspecific request for V=V region 6.17, Step | 
e Nonspecific request for V=R region 6.18, Step | 


(Continued at Step 6) 


region size request 
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Diagram 6.14 


(Steps 1-5) Allocating a Region (Module IEAVERTO) 


WS BS Fata te log ap ge ee ge OF ey aE NE Las phage Seng tetra EGLO ag ge asae a ah ay ele enag Neto te Msp oust ial ee —“T 


N 


et) 


> 


If WAITSW has a value cf X‘OF" and the address cf the 
requesting TCB is not the same as the TCB waiting for 
region space (TCBSAVE), this request will not ke prc- 
cessed immediately. 


The total length cf the request is calculated as 
follows: 


Request Total Length 
Single region = Requested length 
Split region nonspecific = Sum of lengths 
Split regicn specific = invalid; ccde xX'O8' 


The requested size is rounded upward to a segment 
multiple for nonpageable region requests, or to a page 
multiple for payeable region requests. then the 
adjusted size is compared to the PQE size (V=R or V=V). 
If the requested size is larger, control is returned to 
the calling routine. 


The CKTHRESH subroutine Eranches to the paging 
supervisor at entry point IEAPCHTH, passing tc it 

the size of the reguested region. If the paging super- 
visor has insufficient resources (thrashing), CKTHFECH 
returns with a return ccde of 4 in register 15. Other- 
wise, CKTHERESH returns with a ccde of zerc in register 
15. 


Specific requests support Checkpoint/Restart. 


em a a na a a a a a ee ee ee 


[ROUTINE | 
| NAME | 


$-------- + 


| IEAVPRTO 


CKTBRESH 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| LEAPCHTH 
| 
| 
| 
| 
| 
| 
tL 


LABEL | 
aSSscaS= { 


t 
| 
t 
| 
| 
| 
| 
\ 
a a i 


cht 


Diagram 6.14 (Steps 6-10) 
Allocating a Region 

From Diagram 6.15, Step 9 or 

6.18, Step 6 for nonpageable 

region allocation 

From Diagram 6.17, Step 5 


for pageable region allocation Processing Output 








PSIZE 





Input 


Allocate storage 
in LSQA. 


Obtain space for control blocks. 








Register 4 


Address of TCB 





Initialize the control blocks for the 


egien. LRRUULBRRRLEPRLERRRARRRRRRRRT 


PQEBFBQE 
PQETCB 
PQESIZE 
PQEREGN 











If nonspecific request, establish subpool 
252. 






Register 14 


Return address 







If request is for a V=R region 





If the request was a GETPART specific 
request that had been waiting for 


space, make all initiations dispatchable, DISPINIT 






PQENXT a 
PQEPREV 


Region reference 


T validity map T 





TCB 


Caller 


Register 15 


Return code=X'00' 
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Diagram 6.14 


~J 


GETPART 


(Steps 6-10) Allocating a Region 


branches to the GETMAINB subroutine three times 


to obtain (1) 16 bytes for an FRBQE (2) 48 Eytes for a 


DPQE and region reference-validity map, and 


for a PQE. 


(3) 32 bytes 


and then initializes other control block fields as 


follows: 


Control 


Block 


FROE 


POE 


DPCE 


Regicn referernce-validity ma, 


a ee ee a ee a a a ae ee ee ee ee ee ee ee 


Field 
Narre 
FWOPTR 
BCKPTR 
SIZE 
REGADDR 





PQEFFBCE 
PCEPFBCE 
PQETCS 
POESIZE 
PCEREGN 


FQENXT 
PGEPREV 


Hex. 
Disp. 


0 
4 
8 
Cc 


0 
4 
19 
14 
18 


0 
4 


4 
| 
| 
| 
| 

GETPART stores the address of the CPQE - 8 in the TCR | 
| 
| 
| 
| 
| 
| 
| 
| 


Initialized 
to 


POE address 


PGE address 
Region size 
Regicn start| 
address | 
FECE address | 
FBCE address | 
TCR address | 
Region size | 
Regicn start | 
address | 
PQF address | 
FCE address | 
| 
| 
1 


(Module IEAVPRTO) 


{ 
! 
t 
I 
| 
| 
a 


LS ee 


hit 


Diagram 6.15 (Steps 1-4) 
Allocating a Specific Region 


From Diagram 6.14, Step 5, 
to allocate a specific region 






Processing 






lf region is not within the boundaries 


of the PQE 












Caller 





Register 15 


Return code=X'08' 





If there is no free space 


Search FBQE queve for a block that 
includes the region requested. 


_— 


PQEREGN 


-" 7 
+ ‘ 


- 








eae joie e If the space is not available, 6.19 
Gif V=V request, check external page GETAUX 
storage. 
e If external pages are not available 6.19 


(Continued at Step 5) 
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Diagram 6.15 (Steps 1-4) Allocating a Specific Region (Module IEAVPRTO) 


a I Pee Ga ye Mp Pe gr ge ore Ty Ree Le ay Eee ag Ray SU SRL Sn ag ae ter wee poe a yet nage Woes ae ~T 
| ROUTINE 


baa se ee eee ee ete ei ee ee eee eee 
| 1 The address of the V=V or V=R PQE, the rounded region 


size, and tne specific address of the region are 
determined prior to entering the GETPART specific code. 


GETPART 

not within the boundaries of the dynamic area: 
region start address < dynaric area start address 
region start address > dynamic area end address 
region end address > dynamic area end address 


—— ee 


| 
| 
{1 If any of the following conditicns exist, the region is 
[ 
| 
| 
| 


9th 





Input Processing 


5 if region start address = free area 
start address, and region end 
address < free area end address: 


that is contiguous with the high- 
address end of the region. 


TTT 
| 


Start 
address 


6 If the region start address > free area 
start address and region end address < 
free area end address: 


L--_— 


e Modify FBQE to describe the free area 
that is contiguous with the low=address 
end of the region. 


Free end address & poet 


Region —— 
Start 


address 


beige tg a 


@ Obtain space for an FBQE, 


e Initialize new FBQE to describe area 
that is contiguous with the high- 
address end of the region 


Region end address —-—- — 


p-i-- 


7 If region start address > free area 
start address, and region end address = 
free area end address: 


e Modify FBQE to describe the free 
space that is contiguous with the 
low end of the region, 


-—----— 


8 if the region coincides with the free space: 


e@ Remove the FBQE from the queve. 


e@ Free the FBGE space from SQA. 


Q For V=V requests 


For V=R requests 


e Modify FBQE to describe the free dre CAAA RE Daa te 2 N 
¢ as we \ 


Diagram 6.15 (Steps 5-9) 
Allocating a Specific Region 


Output 





FBQE 






> 9 


Pda Wwea Wastes aa 
WRBaasWaaaa 








GETMAINB 


Allocate 16 bytes 
for an FBQE. 
6.4 


FBQAREA 


ay O 





WABABARRBRABRARRRRRRRR 
9 


dl 
™ 


NNN AA AANA WRBBRRRBRRBARY 


| RMBRANCH 


at aaa 


6.17, Step 4 


6.17, Step 6 
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Input 


Register 0 


2 siIf not aspecific request 6.14, Step 10 


Register ] 


Register 4 


Address of TCB 


GETMAIN Parameter 





C C 


Diagram 6.16 
Allocating a Specific V=R Region 


From 6.14, Step 8 to allocate 


a specific V=R region Processing 


Output 


1. Indicate allocation of a nonpageable (V=R) 
region, BRRRASERASRABRRERERGGGQaa VMMFLGS 


3 = Allocate and fix contiguous pages in real 


storage. Paging Supervisor 


TAP RBA Aa Sa’ 
ny 





IEAPVRAL 
Allocate nonpageable 
region, 
5.10 
4s unsuccessful 6.33, Step 4 
Otherwise 


6.14, Step 10 


8tt 





Diagram 6.17 
Allocating a Nonspecific V=V Region 


From 6.14, Step 5 to allocate 
a nonspecific V=V region 


Processing 






1 Allocate external page storage to back 


up batch tasks. GETAUX 


6.23 
























Register 4 





If unsuccessful 6.19, Step | 






Find block of free storage for the region 
size requested, 








If search was unsuccessful, release the 


external page storage. GETAUX 


6.40 


6.19, Step 1 





4 Assign storage to the task. BARRERA TEASAARE aaa anaaaaaaaa \ TCBSTI 


er “* 
— 4A 


TCBSCT 










Create page tables and external page 
tables in LSQA for the region. 


Paging Supervisor 


IEAPTCD 
5.34 


6.14, Step 6 


ase 


me: 
rk ae 


TCBRV 
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Diagram 6.17 Allocating a Nonspecific V=V Region (Module IEAVPRTO) 


a a aa a a ma Te ope a 1 
| KCUTINE | | 

| NOTES | NAME | LABEL 

| -~-------~--------------------------------------------------}-------- $o------- 1 

| 1 If the request is toc large, GeTAUX puts a return code |GETAUX | 

| of X*08" in register 15. | | 

| | | 

| 2 An indicaticn is passed to notify FBQSRCH to search {FECSRCH | 

| from the low end of the free area. | | 

| | | 

| 3 |GETAUX | 

| | | 

| GETPART initializes fields in the TCB: |GETPART | 

| | | 

| TCBSTI - Segment table index cf the first seqment | | 

| TCBSCT - Number of segments assigned to the regicn | | 

| TCBRV - Set to zerc to indicate a pageable task | | 

| | \ 

1 5 The Create Page Table subroutine cf the raging super- JIEAPTCD | 

| viscr creates the rage tables and external pag= takles | | 

| and updates the system and user segment takle entries to| | 

| foint to the new page takles. tThe Create Page Tabie | | 

| subroutine cails GETMAIN to build the takles. This cail| | 

| resuits in further processing as described in ciagrar | | 

| 6.4 “Allocating Storage for Contrecl Blccks." | | 

ae ee Mer a needy rar gr aA fc oe NR Wy Cee eemn ey tee nee ee p Geer eee Ae a ere ee 
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Diagram 6.18 
Allocating a Nonspecific V=R Region 


From 6.14, Step 5 to allocate 


a nonspecific V=V region 


Input 


Register 4 


Address of TCB a 


Register 14 
== 


VER PQE 










Processing 


Search FBQE queve for block of free 
virtual storage large enough for the 
region size requested. 











Output to Caller 





If block of the exact size is not found, but 
a larger one is available 










Caller 









Register 15 


Return code=X'10' 






If there is no available block => the request 6.19, Step 1 


Paging Supervisor 
JEAPVRAL 









Allocate page frames for the virtual region 
found. 










mad 46 








Output to 6.14 


If an SQA, LSQA, or fixed page is 
located within the region, resume search. og 1 


RCSAVE 


MAAR EERE a 


6.14, Step 6 





Otherwise, save return code. 
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Diagram 6.18 Allocating a Nonspecific V=R region (Module IEAVPRTO} 


Ce ee ee or Se Pe Pa et ee eae 5 aap amare pas ToS S-sS- 1 
| |ROUTINE | | 
| NOTES | NAME {LABEL | 
}--~-------------------------------~--------------------------}-------- +------ -~4 
{| 5 The V=R Region Allocation surroutine of the paging | LEAPVRAL | | 
| supervisor indicates this condition by a return code of |IEAVPRTO| | 
[| x"10°. | | | 
[ | [ [ 
| 6 Other return codes are; X"'00' if the region has been | | | 
| successfully allocated, and X'0C' if the required page | | | 
| frames are not currently available, but are expected to | | | 
| become available scon. | | | 
Dei he et ee i, fe ee ae Mie et ee et yen aor aren better eat rat | 


CSH 





From GETPART processing whenever 
a region can not be allocated because 
of insufficient virtual storage 


Diagram 6.19 


Unsuccessful Virtual Region Allocation 









Input Processing Output 

RCSAVE 

Reaisiend 1 If request is nonspecific, set return code. >} Return code=X'04" 

Address of requesting TCB —_—_— —_— — — 7 

5 
Register 14 c-—_ =| —+ 2 Search TCB queve for LSQA or SWA 
ee i | segments within the boundaries of the 
: 7] | requested region. GETPART register 
save area 
L 3 If found, save TCB address and set OT Address of TCB 


CVTHEAD 


TCBTCB 
TCBLSQA 


| 
OU a ca ane alls 


TCB 


= LSQA DQE 


5 


ee 


6 
TCBLSQA 


LSQA DQE 








return code. 
RCSAVE 


Return code=X'14' 


Set up TCB to be posted. Caller 
TCBSAVE 


Address of requester's 
TCB 


Specific Address Wait 


Spor 


TCB 
T TCBGPECB 





If SVC 4, set TCB to be posted 





Initiator's TCB 
If SVC 10: 








e@ Set requester's TCB nondispatchable. PRBRRRRRERE EEE 





SAANAS NSS TCBFCDI=X'01' 


y 


~_ \\ 


\\\ 


> TCBPQE=X'00' 





@ Indicate task switch. 


BR 14 


Register 15 


Caller 
| Return address 
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Diagram 6.19 Unsuccessful Virtual Region Allocation (Module IEAVPRTO) 


re ee a es a ee Ba ana ge er) cae ene 1 
| |ROUTINE | | 
| NOTES | NAME | LABEL | 
ee ee en ee a eo ee tee ae 1 
| 2 For GETPART specific requests, the routine examines the | IEAVPRTO| | 
| TCB chain (whose anchor is the CVTHEAD field of the CVT) | | | 
| to determine whether any LSQA cr SWA segments ere allo- | | | 
| cated within the boundaries of the requested region. | | | 
beecesst ease net Sea ee a eee ee See eae dee eS Oe io ee 4 


nSh 





Diagram 6.20 
Allocating a SWA Segment 


From CSPCHK after an SVC 4 
to allocate a SWA segment 





















Input Processing 
IEAPGSWA 
Register 1 Output when request is deffered 
Address of ECB parameter list 1 If a GETPART specific request has been Exit Routine 
deferred (1GC003) (3.14) 

Register 4 

Address of TCB ss 
TCBGPECB 

Register 5 2 Obtain external page storage for the Th ; 

Subpoo! number SWA segment. > is Pegs 






| GETAUX 


Exit Routine 


(1GC003) (3.14) 






TCB 


Register 15 


Return code=X'04! 








3 if external page storage is not available, 
TCBSWAH defer the request. 


4 Allocate the highest segment available. FBQSRCH 


5 If segment could not be allocated, La 


release the external page storage, and 


GOVREFLB defer the request. | GETAUX 


Exit Routine 


(IGC003) (3.14) Output when request is satisfied 


6 Create a page table for the segment. - Paging Supervisor Parameter List 


JEAPTCD Address of segment 
5.34 







7 Obtain storage for an SWAB, GETMAINB 


Get control block. 


6.4 


8 Initialize the SWAB. SWABSEGT 


cae 
eps 2 te 


Exit Routine Register | 


(1GC003) (3.14) 





Address of parameter list 


Register 15 


Return code=X'00' 
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lagram 6.20 Allocating a SWA Segnent (Module IEAVGMO0O0) 


Rigs ae ea a yey ty fe os Ie aways ey Sy ites Soar ee a oR ee pd eg gh” * “Sa ay i aa a em 
| ROUTINE 


NOTES | 


NAME 


j---------—-~-----~------~---~----------------~--------------- fo------- 


es ee 


When the system issues an unconditional SVC 4 list instruc-| 
tion in ECP mode for a ncnspecific single regicn tc get a 
System work area, the GETMAIN rcutine CSPCHK gives control 
to IEAPGSWA to process the request. 


ma, 


| 
| 
| 
The routine determines whether a GETPART specific | 
request iS waiting tc ke hcnored ky testing the WAITSW | 
field in IFAVPRTO for a value cf X'OF'. If a request is| 
waiting, the GETSWA request is deferred so a segment of | 
virtual storage will not be assigned that could make it | 
impossible to ever satisfy the specific request. | 

ae 


— ae oe ee oe 


SETWAIT 


pa — H+ 4 


9St 


Input 


Register | 


Negative value 


Register 4 
Address of TCB 


Register )4 


Return address 


SWAH 
SWAHFRST 
SWAHLAST 


SWABNXT 
SWABFLGS 





Diagram 6.21 
Allocating a SWA Page 


From CSPCHK after an SVC 10 
to allocate a page from an SWA 


Processing Output 


Type-] Exit 


IEAOXEOO 























GETPAGE 






1 Search for a segment with a free 


page. 








3.15 





Register 15 


} Return code =X" 04 | code = X' Q4! 






If none found. 








Paging 
Supervisor 


JEAPFP2 
5.27 







Get addresses of page table entry 
and external page table entry. 





4 Assign requested page. 


Type-1 Exit 


JEAOXEOO 
3.15 


PGTPAM 
“4: s 


Register 1 





Address of page 


Register 15 
Return cade = X'00' 


8Sh 


From GMCOMMON to obtain : 
4K blocks on a page boundary Processing 


Input 


Register | 


Address of last DQE 


Register 4 


Address of TCB 


Register 10 


Size requested 


Register 12 


Subpool number 


TCB 





G4KSRCH 


Diagram 6.22 
Allocating 4K or More 







Output from Step 2 


FBQSRCHA 
Obtain 4K blocks 
6.6 


Obtain requested storage. 


Register 15 


Length of largest 


If storage is not available, 





available area 


| GMCOMMON | N 


Get storage for new D@GE and add it to Output from Step 7 


the queue. GETMAINB 










DQFQEPTR 


DQEBLKAD 
DQELNTH 












if V=V task: 


e Locate page table 
e Mark page table entries 
'GETMAIN-assigned'. 


If user subpool : 


e Set protection keys in Paging Supervisor 


4 EAPFP 
527 
g 


AALRLUBEBABEREREEESEEEEEEEEEEEEEEE 


external page table, 


If V=R request is: 


e For user subpool; set storage keys 
and fetch protection on. 


e For subpool 252; leave key 0 and 
fetch protection off, GMSMFCRE 


Record SMF information. 







Build FQE if necessary. 


GETMAINB 


Get storage for 
control block 







FQELNTH 


FQAREA 
6.4 


Register 2 


Address of allocated 
area 












GMCOMMON 
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Diagram 6.22 Allocating 4K or More (Module IEAVGM00) 


Dg gS pre a ge ee ee lar eee aeRO PS Oey a ge st pe Pe gg ey Pe ee we eB SR eee Dace es oS 
| | ROUTINE 


This routine is entered when a region request cannot he 
Satisfied by GFRECORE, when a regicn request is greater 
than the maximum FQE size, or to satisfy a request for 
storage on a page boundary. This routine also sets the 
protection keys for the 4K klocks it cbtains. 


| 

| 

| 

| 

| 

| 2 The value passed tc GMCOMMON is the largest available 

| size returned to G4YKSRCH by FBQSRCHA unless GFRECORE was 
| entered previously. GFRECORE determines the largest 

| Size available in the FQF queve. If GFRECORE was 

| entered, G4KSRCH compares the values returned by 
| 

| 

| 

| 

| 

| 

| 

| 

| 
L 


GCMCOMMON, 


ITEAPFP2 
G4KSRCH 


4 If the page table entry is in real storage, G4KSRCH 
sets the storage keys to the key cf the TCB and sets 
fetch pretecticn on. 


7 If storage on a page boundary was requested, the 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
GFRECORE and FBCSRCHA and passes the larger value to | 
| 
| 
| 
| 
[ 
| 
allocated area is taken from the low end of the [lcck. | 

L 


09h 


Input 


Register 6 


Diagram 6.23 
Monitoring Batch Processing Storage 


From GETSWA or GETPART 
to determine whether there is 
enough external storage for 


batch jobs. 





Processing 





















GETAUX 


1 If the request size exceeds the To Caller 
maximum number of pages 
available for batch jobs. 


2 if request size exceeds the 
system uncommitted count. 

3 If the request size exceeds the To Caller 
number of pages that can be 


allocated. 


Output 


If Request Is Not Satisfied 





Register 15 


[__Return code = X'08" | code = X'08' 











If Request Is Not Satisfied 






Register 15 


Return code = X'04' 


If Request Is Satisfied 





4 If the request cannot be 
satisfied now. 


To Caller 

















Update external page storage 
counters. 


REBAR BEREEBA 


g 


System Uncommitted 
Batch Committed 
al vie CEP 





\ 


Register 15 


| _ Return code = X'00' | code = X'00' 






To Caller 
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Diagram 6.23 Monitoring Batch Processing Storage (Module IEAVFRI0O) 

ee ge ag ME tig na gE Pag Oe Te a ee (ee 
| RCUTINE 

NOTES [NEME 


3 The request length is cenrared ic the original tctel 
uncommitted (TU) nuncer cf pRacs minus the current 
number of pages committed tc katch jobs (BC), minus the 
number of pages reserved to allow a TSO task to he 
forced from the system (ISC), winus the current numker 
of pages in uSe for Tso (TSO ). 
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Diagram 6.24 
Monitoring TSO Storage 
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external page storage for 


a TSO task. 
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Length requested —_—— eo available. 
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Diagram 6.24 Monitoring TSO Storage (Module IEFAVPRTO) 
a ee ae ee ed ee ae 1 Ea Sete ae 
| RCUTINE | 

NOTES |NAME | LABEL 

3 The requested size is conpared te the original total 
uncommitted (TU) numker of pages minus the current 
number of pages committed to batch processing (BC) 
minus the number of rages reserved to allow a TSO task 
to be forced from the system (TSO ) minus the current 

B 
number of pages in use for TSO (TSC ). 
U 


TU - aC - TSO - TSO 
B v 
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| 

| 

4 The routine exits to the Type 1 Fxit routine with a | 
return code cf X'08' if: | 
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request size > maximum number of pages (MAX } | 

T | 

request size > system uncommitted pages (SU) | 
request size > TU - BC - TSO - TSO | 
B U | 

| 
| 
| 
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5 The system uncommitted count is decremented and the TSO 
committed count is incremented by the number cf rytes 
requested. 
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Retry the request. 







1 If the request is from GETMAINB for LSQA 
space, change to SQA request and retry. 


6.4 


2 If request is from GETMAINB for SQA 
space or an unconditional SQA request, 
set up wait state. 


Otherwise > 


GNOTSATB 
CDPURGE 
3 Purge unused modules. Purge modules if 


possible. 





NRETRY 


4 Retry the request if: 


e Variable request and there is 
enough space for the minimum 
length; or 


GMREPEAT 


Repeat the request. 








e@ LSQA request from ABTERM or 
a system task; or 


6.2 





e Modules were purged. 


FLISTADV 


Free list entry storage. 


5 Free storage for previous list entries 
if list request. 






6 Return if request is conditional. 


GCOMM7 


Return to caller. 


6.2 


7 Abnormally terminate the task. 
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Out-of-Storage Processing 
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iagram 6.25 Out-of-Storage Processing (Module IEAVGM00) 
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If the request is an LSQA request during abnormal ter- 
Mination, or if the request is from a system task, the 
SPQE for the SQA (GOVRFLB) is used to retry the re- 
quest. If the request is for SQA or LSQA, it may ke 
necessary to repeat it more than once Lrecause the larg- 
est available space may cross a rage boundary and can- 
not therefore be completely allocated. 
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Error Cade 
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and FREEMAIN 
routines 





e Diagram 6.26 


Error Processing for GETMAIN/FREEMAIN 


Processing 


GERROR 


Generate ABEND error code. 


Exit to caller if ABEND was the caller, Caller Output To ABEND 


Exit to ABTERM if error code is 1. ABTERM 
(IEAOABO1) 
(8.11) 


Search for available entry in INFOLIST. 
Exit if not found, 


Store TCB address and ABEND code, a ae eee 
Ensure length and address are adjusted for 

AQE-type request, 

Store length and subpool number, variable 

ABENDATA, and reason code. es 


Retry if force SQA request. 6.25, Step 4 


If force SQA request is satisfied, set up 


return to GETMAIN and exit. ABTERM 





Register 15 


INFOLIST 


INFTJID 
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INFFLGO 
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e Diagram 6.26 Error Processing for GETMAIN/FREEMAIN (Module IEAVGM00) 


eg ye NS ee aS Se ee ge ee ee fc. 9 aaa ames 1 
|ROUTINE | | 

| NOTES | NAME | LABEL 

}--------~-—---~-------~-------2-----------------------------f--—----- $-------- 

| 3 The ABNDATA area is cleared. There are no messages |GERROR_ | 

| written for code 1 because it is self-explanatory. | | 

| | | 

| 5 If this was a branch entry, INFFLGO is set and the cal- | | 

| ler's return address is placed in the information list | | 

| (INFBADDR). If the TCBJSCBB field is nonzerc, the { | 

| JSCBTJID field is moved into the information list at | | 

| INFTJID. | | 

| | | 

| 6 For AQE-type requests, eight is subtracted from the | | 

| length and a check is made to see if the address has | | 

| been adjusted. (There are times when the length and | | 

| address adjustments are not synchronized.) If it has | | 

| been, eight is added to the address to compensate for | | 

| the AQE. | { 

| | | 

| 7 For FREEMAIN requests, the FREEMAIN address is also | | 

| placed in INFVAR2. | | 

| | | 

| 8 | | NRETRY 

| | | 

| 1 | Error exits to the ABTERM routine cause the task that | | 

| issued the request to ke abnormally terminated. | | 

| | | 

| Register 1 contains the error code. | | 

| Register 3 contains the address cf the CVT. | | 

[ Register 4 contains the address of the TCB. | | 

| Register 14 contains the address of IEAOXEO00. | | 

| | | 

| Input to GERROR Output from GERROR | | 

| ERROR CODE= 1 x*0104' | | 

| X°010A° i | 

| ERROR CODE= 2 X*O20A‘ | | 

| ERROR CODE= 3 X* 0305" | | 

| X*030A‘ | | 

| ERROR CODE= 4 X*O40A® | | 

| ERROR CODE= 5 x*0504' | | 

| X*0505° | | 

| ERROR CODE= 6 x'0604° | | 

| X*0605° | | 

| ERROR CODE= 8 X*"0804' | | 

| X*O80A" | | 

| ERROR CODE= 9 x'0905° | | 

| X°090A' | | 

| ERROR CODE= 10 x"OA05' | | 

| X* OAOA' | | 

| ERROR CODE= 11 X"'OBO4' | | 

| X*0B05° | | 

| X"OBOA‘ | | 

| ERROR CODE= 13 x*OD05' J | 

| X'ODOA‘ | | 
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Diagram 6.27 
Overview of Releasing Storage 
From 1GC005, CLBRANCH, 


Input ea to process Processing 
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FLISTADV 


Process FREEMAIN 
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Length to be freed 
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e List 
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FELEMENT 
Process FREEMAIN 


element request. 


Register 4 
Address of TCB 









e@ Element 
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SubEeaI Ee: Sek 62 2 = Branch if subpool FREEMAIN request. SPFRMAIN 
Free subpool, 
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Return address Se Otherwise, call the FREEMAIN 


Common routine. 
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Diagram 6.27 Overview of Releasing Storage (Module IEAVGMOO) 


(ee eS a Sra ea Se see A ea 2 == —7 
| JROUTINE | 
| NOTES | NAME | LABEL | 
}------------~~-----~-------~-------------------------------- +-------- {-------- : 
| FLISTADV - This routine processes FREEMAIN list | FMCOMMON | | 
| requests. For the first entry in the list, it calls | FLISTADV| { 
| FMCOM. For all suksequent entries in the list, it calls|FELEMENT| | 
| FCOM1 to bypass the subpool check processing. When the |FVARCHK | | 
| last entry in the list has been processed, it branches | | | 
| to FREIRNI in FMCOMM1. | | | 
| | | | 
| FELEMENT - This routine picks uf the element length | | | 
| entry, sets ug registers as though the request were an _ | | | 
| Svc 10 request, and calls FMCOMMIA. | | | 
| | | | 
| FVARCHK ~ This routine simply picks up the length ircm | | | 
| the seccnd address entry, sets up registers as though | | | 
| the request were an SVC 10 request, and calis FMCOMMIA. | | | 
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From FACOMMI1 
to free a subpool. 


Processing 


SPFRMAIN 


1 Check validity of request. 


Find the subpool. 


If subpool was not found. 


If subpool 253, free each AQE. 


Free all FQEs within each DQE 
of the subpool. 


Free each DQE and storage 
associated with it. 


Invalid 


GERROR 


| CSPCHK | 


FMCOMMI1 
6.27, Step 2 


SP253FR 
6.31, Step & 


FMAINB 





FMCOMMI1 


6.27, Step 2 


Diagram 6.28 
Freeing a Subpool 


Output 
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Error code 


MSGLEN 


Reason code and 
Data length 


ABNDATA 
Address of TCB 


Storage for the subpool 
requested is freed for 
reallocation 





Diagram 6.28 Freeing a Sukgcol (Mcdule IEAVCM0O0) 
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1 If the length is not zero, a reason code of X*08' and 
Gata length of X'0C" are set in MSGLEN and GERROR is 
entered with an error cede of 3. If this is a request 
to free subpool 243, 244, 245, or 255, a reason code cf 
%'O8* are set in MSGIEN, and GERROR is entered with an 
error code of 4&. 


2 If the subpool is 0 and the requester is not in key Q, 
Frocessing is the sare as for €rror code 4 in Step i. 


a SS a as ss sa ce a ec ce ee ee ee ee i ee 
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GERROR 
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From FELEMENT or FYARCHK 
to free space in a region. 
From FLISTADY to protess the 
first entry in a list request 


Processing 
Register 0 FMCOM 
Length to be freed 
: SS SSS Ss 1 Obtain the SPQE for the subpool in which 
pegister. | space is to be freed. 
Address to be freed | 
From FLISTADY to process 
| second and subsequent list 
Address of TCB entries 


FCOM) 





Length to be freed = eS] 
rc —|— — — — — — +4 2 If request is for SQA or LSQA, 
| 
Se cel age L_-_— 3 Round the request length. 


Subpool number a3 
(sos Find DQE for the area to be freed. 
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Return address Find the FQE for the nearest free space. 


Update the FQE (See Diagram 6.35 for 


From FLISTADYV when last : 
entry in list has been Release 4K blocks from the free area if 


processed there are any. (See Diagram 6.30 for 
details) 


FRETRNI 


8 Return. 








Find FQE, 
6.34 


details) LWARBABAREEEESEEEEEEEEG EERE 





Diagram 6.29 
Freeing Storage Within a Region 
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Diagram 6.29 Freeing Stcragé within a Region (Module IEAVGMOO) 


[ee pe ee pe aS Re ee ee Toes oes Pah eS a 

| |ROUTINE | 

| NOTES | NAME | LABEL 
~=--~--~--~-~~-~-~-~~----~--~----=---~--~---~---=-------~---- 4----~---+--------f 

| 3 The CRNDLNTH subroutine rounds the request length to an |CRNDLNTH| 

1 eight-byte multifle. | | 

| | | 

| 7 | FCOM | SPREL 
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From SPFRMAIN to 
free a DQE and 


Input associated storage Processing 
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SPREL 


f 
Eshg ete eeaiees 1 Return 4K blocks to FBQE queue. 


Address to be freed 
2 Mark all V=V pages "not assigned" and 
set protection key in EPT to zero. 


Address of TCB 


Subpool number 3 


Set protection key to zero and set fetch 
protection on in V=R pages. 


Return address 


4 Release pages to system. 





5B sRecord storage usage information. 


G Update the DQE: 
e Remove the DQE and FQE if the 


entire area is now free. 


e Update DQE and FQE if upper 
boundary has been freed or lower 
boundary freed 


e@ Create a DQE and update old DQE 
if section in the middle of the DQE 


area is free. 


This portion of the FREEMAIN 

Common routine handles region 

requests when the storage released, 7 
combined with contiguous and 

previously free areas of storage, 


is greater than 4K. 


Return, 
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Diagram 6.30 
Freeing More Than 4K 
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Diagram 6.31 
Freeing Storage in the SQA or an LSQA 


From 6.29, Step 2 to 
free storage in SQA 


or LSQA 


From SPFRMAIN 


ee 


Processing 







1 Free a quickcell, if the requested address QQCFREE 


is within the quickcell area. Free quickeell. 


6.37 


heen eee BR 14 
“| 


l Caller 


——$ | 2 Obtain the SPQE for the space to be 


freed. 


3 Round the request length. CRNDLNTH 


























to free AQE L 4 Adjust the address if there is an AQE, 
SS = 5 Find the DQE for the area to be freed. 
SP253EFR Output 
nce ae 6 Find the AQE, if there is one, and: AQE removed from 
queue 
| e@ Remove the AGE if the entire area 
is being freed, MABABRBEREBEEEEREEREEGQGE 
| 
| 2 Build a new AGE if the lower 
| boundary is being freed and the New AGE added 
upper boundary is not, or if the 
| middle is being freed. 
| e Otherwise, update the AQE. BRRRABABaaaaaaaaaa SN] 
| AQE updated 
7 Find the FQE for the nearest free space . QELOCATE dara n 
| La 


6,34 Specified storage is freed 


for reallocation 
8 Update the FQE. (See Diagram 6.33 for Register 15 
details.) 


Return code=0 


Clear page. 


Q Clear pages that are now free. co IEAPCLR2 


Did] 


BR 14 
Caller 
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Diagram 6.31 Freeing Stcrage in the SQA or an LSQA (Mcdule IEAVGMOO) 
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GO 
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If there is a quickcell descriotor block and the address/| 


of the space to be freed is in the quickcell area, the |QCFREE 


CCFRE& subrcutine is used to free the guickcell. | 


A GETMAIN request for LSQA may have been satisfied fron 
the SGA. If the address to be freed is within tne SQA, 
the SPCE for SGA (GOVRFLE) is used. 


1f the address to te freed is not on a doubleword 
boundary, if the request was an SVC 5, a return code of 
0 and variakle length cf X‘'0C" are placed in MSGLEN or 
if it was not an SVC 5 request, a reason code of 0 and 
variable length of X'08* are placed in MSGLEN. Then the 
task is abnormaliy terminated by going to GERRCR with a 
code of 9. Ctherwise, the CRNDLNTH routine rounds the 
request length to an eight-byte muitirfle and adds eight 
bytes to the length if there is an AQE. 


| 

| 
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| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 
Subposls 243, 244, 253, and 254 are for storage | 
described by allocated queue elements (AQEs). When | 
storage is freed from cne of these subpools, the start | 
address must be kacked up eight bytes to free the ACE. | 
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| 

| 
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| 
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The AGE is pointed to Fy the TCBAQE field of the TCB. 

If there is no AQE chain for subreccol 243, 244, 253, or 
254 requests, the requesting task is abnormally ter- 
Minated (GERRCR code 13). When the AGE is oktained it 
is updated: If the whole area described by the AQF is 
being freed, the ACE is removed frem the queue. If the 
upper koundary of the AQE is not being freed, eight is 
suktracted from the length of the area tc ke freed to 
allow space for a new AQE. The new AQE is built and 
added to the queue. Tf the lower boundary of the area 
described ty the original AQE is not being freed, the 
length of the AGE is changed. If the lcwer koundary of 
the AGE is being freed, the AQE is removed from the 
queve. If the Lower boundary is nct heing freed and the 
upper boundary is teing freed, eight is substracted from 
the length and added tec the address of the area to ke 
freed. 
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| 

- . . * « | 
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Diagram 6.32 
Freeing Space for an LSQA 
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o release LSQA segments = 
Input a2" Processing 







Output from Step 1] 
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4=validity check ee 
8=no validity check 


Register 4 


FREELSQA 
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1 If segments are not ready to be freed, and 
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> Release segments. 
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Free the segments. 
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last virtual LSQA pages. 


Dee oe ees Paoli es 









4 Delete the page tables for the segments BALR 
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Free page tables 
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Diagram 6.32 Freeing Space for an LSQA (Module IEAPLSCA) 


CR ee ee ee Se Eg eee : craean aan ie Se arian areas 
| RCUTINE | 

| NOTES [NAME | LABEL 

|} -----------~-~---~-~---~---—+-----+----------------- ---~-------- f-------- 4 ---- +--+ 

| 1 If there is more than one FOE, or if the FQE for the | IEAPLSCA| FREELSGA 

| LSQA describes a space smaller than the size of the seg-| | 

| ments when they were first allocated, the segments can- | | 

| not be freed. If register i equals eight, these checks | | 

| are skipped. | | 
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Diagram 6.33 
Freeing Space for a Region 


From IEAVPRTO to 


free a region 
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Purge unused modules. 






1 Purge unused modules in the region. ; CDPURGE 


6.9 


2 Make initiators that are waiting for a 
region dispatchable. 


DISPINIT 
— Output ». sree 


Make initiators 
dispatchable. 
3 If any space in the region is still 


allocated, other than subpool 252 space, ABTERM Register 1 


exit. (IEAOABO1) (8.11) Return code=X'20A' 


] t 4 If a pageable region is being released, 
npu release external page storage. FREEAUX 





Register 4 





5 Return the region to the queue of free blocks 


for the dynamic area. ans MRELEASE 


Register 14 6.36 
6 Free the control blocks that describe the 
irae | RMBRANCH 


Release control blocks 


(FMCOMM1). 





Output from Step 7 






6.28 
R 14 
7 If real region allocation request was Aa Register 15 
aller 
unsuccessfu| Return code=X'10' 
8 if a nonpageable region is being released, 
free its page frames, Paging Supervisor 
po exovaat 
3.10 
Caller 


Q if a pageable region is being released, 
delete the page tables and external page 
tables in the LSQA. El Paging Supervisor 


IEAPTCD 
3.35 


10 Return to caller. Output from Step 10 





BR 14 


Register 15 





Caller 
Return code=X'00' 
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Diagram 6.34 
Locating an FQE to Free Space 


From FMCOM Diagram 6.29, . 
Step 5 to locate the FQE Processing 


Input 


QELOCATE 


Output from step 1 








Register 3 1. ‘If there is no FQE, return. 


Address of DQE 


I 6.29, Step 6 Register 0 


Register 7 


Address of upper boundary 


I 


Determine upper and lower boundaries of 
area described by FQE, 
Register 10 


Search FQE queue for one whose lower Output from Step 4 
boundary is & the upper boundary of the 
area to be freed. 


Address of upper FQE 
boundary 


GERROR 


If there is overlap, abnormally terminate 
the requesting task. Address of lower 


FQE boundary 


FMCOM Address of upper boundary 


6.29, Step 6 
Address to be freed 


Address of previous FQE 


5 i, ol: "i 
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Diagram 6.34 Locating an FOE to Free Space (Module IEAVGN00) 


NOTES | NAME 


4 

2 For a region FGE, the upper koundary is the FQEAREA. JOELOCATE| 
For an LSYA or SQA FCE, eight is added tc the address to| 
include the FQE. | 


3 The lower btoundary is calculated by subtracting the FCE 
length from the upper boundary. 


bh 


The area to be freed cverlarps a free area if the FQE 
lower Eoundary is less than the upper Loundary to be 
freed and the FQE upper boundary is greater than the 
beginning address cf the area to he freed. 






Upper boundary (FQE) 


YUU Upper boundary (area to be freed) 
Over- KKK X 
lap CB Ky YX) Lower boundary (FQE) pale 


Wf Comparison 1 


Comparison 2 






Yy boundary (area to be freed) 


SS ee ee ee ee ee re! oe | 


(a a i i ee 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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oe ae ee oe ee ee ee oe 


nst 


Input 


Register 0 


Length being freed 


Register 1 
Address being freed 


RRR 
FQEPTR 


FQELNTH 
FQAREA 


Py. 


Lower boundary (LBF) = 


UBF - FQELNTH 


i 


Upper boundary (UBF) 


Lower boundary (LBA) 


E 


Upper boundary (UBA) = 
LBA + Length 





Diagram 6.35 
Updating an FQE to Free Space 


From 6.29, Step 6 or 
6.31, Step 8 to update 


an FQE Processing Output 









1° Update FQE if 


UBA = LBF LWABAEBREBAEEEEREELRERRERERERRRRRRRRERRER ET 
and combine FQEs if they are now contiguous. 


Create a new FQE if 


UBA * LBF and GETMAINB 


Get space for PQE, 
LBA ¥ UBF 6.4 
New FQE 


and add it to the queve. 


Change FQE address if 


a. 


LBA = UBF BARBERS BEERRREREREREELERERERERERREREREREEERERR REET: ) FQELNTH | 
FQAREA 


Caller 


6.29, Step 7 or, 
6.31, Step 9 
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Diagram 6.35 Updating an FCE to Free Stcrage Space (Mcdule ITEAVGM00) 


NOTES | 

4 If the upper bcundary cf the area Lkeing freed (UEA) 
equals the lower boundary of the FCE (LBF), the length 
of the FCE is increased ky the length of the area being 


| 
| 
| 
| 
2 If the upper boundary of the area to he freed is nct | 
equal to the lower bcundary of the area described by the] 
FQE and the upper boundary of the FOF is not equal to | 
the lower boundary of the area keing freed, a new FCE | 
must be created. (Fcr a regicn reguest to free the | 
entire area descriked? ky the DOE, a new FQE is not | 
created since it would be freed in later processing cf | 
this request.) | 

| 

| 

| 

| 

| 

| 

i 


3 If the urver boundary cf the FCE equals the lower boun- 
dary of the area being freed, the FOF is moved if it is 
an SGA cr LSQA FOE or its address is changed if it is a 
region FGE. The iength cf the FGE and the length keing 
freed are combined tc tecome the new lengtn. 


a ee ae a ae a i a ae ee eee ee 


(Sa Sa er eat eee eee oe eee To Ss555 
| 


ROUTINE 
NAME 
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! 
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! 
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Diagram 6.36 


Freeing 4K Blocks 


From FACOMMON to 
























Input release space in a region Processing Output 
Register 6 MRELEASA 
a 
f | From IEAPLSQA 1 Indicate FBQEs are in LSQA. ae 3 
Register | to free an LSQA segment 
Address of PQE | MRELEASE 
Register 9 ! SANMON Dummy FBQE 
= From FM i 
Addcose to bev teed = ae ies seice anieion 2 Indicate FBQEs are in SQA. 
Register 14 et ee tee 3 Build a dummy FBQE, 
4 Add dummy FBQE to FBQE queve. BRBARRBRRBRRRRRERRREEERREERRERRERRRRERE ERE 
PQE 
-—-- 5 Combine dummy FBGE with previous 
| FBQE if they share aboundary. ®QRRRRRRRRRRRREERREERERERE EE OEE. OE CE EO EEE GO 
| 
| 6 If combining was performed, free EMAINE 
ae the previous FBQE. Free FBQ. 
6.27 
To Caller 
7 Get storage for a new FBQE. CEIMAINE 
FW DPTR 
8B Use dummy FBQE to build a new heal 
FBQE and add it to the queue. ae eee aaa aE 





To Caller L “ 
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Diagram 6.36 Freeing 4K Blocks (Module IEAVGM00) 


6S a a a eee eee to" oe 
| | ROUTINE 
| NOTES | NAME 
}-----~-----------~--~--------------=------------------------ $-------- 
| 3 A dummy FBCE (RBLOCK) is built in a work area and | 

| initialized with the input parameters in registers 6 and| 

| 9. | 

| | 

| 4 The address of the dummy FBQE is compared to the address| 

| in the FBQE to determine where it belongs in the queue. | 

0254526062205 see ee i Bee ee eee ee panera ee 


-F——————_+—-4 


MRELEASE | 
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From FACOMMON 
or QCALLOC to 
free a quickcell. 


Input 


Register 0 


Subpoo! number, length aa 


Register 1] 


f 
| 
I 
~--a---f = --- = 
l 
| 
| 
| 
| 
| 
| 


7 
| 
| 


GOVRFLB 


DQESQA 


TCBLSQAP SPDQEAD 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
SQA or LSQA DQE QCDBLK ! 
= QCLIMITS 
DQEPTR ; Me | 
QCORIGIN a ee 

QCSIZE 

First QCSTATUS | 

| 

4 


QCNO 
QCOFFSET —j— — = 


QCDE 


Second 


QCDE 


Last 
QCDE 


Diagram 6.37 
Freeing a Quickcell 


Processing 


QCFREE 


1 Determine first quickcell address. 


2 Compare quickcell address with 
the address passed, 


a a Syme | ‘ “5 


wes Gaiety i<t Ve 
3 If the addresses are equal, mark BRBRRRRRRRRRBRRRRRERRGERERRERRERRRBRER = 05TATLS 
ae Peles iy + 


QCALLOC 






the quickcell free. ~ 
ort? 
. oe 





Step 1 
6.31 


4 Calculate the next quickcell 


address. 
5 If next quickcell size requested <=> 2 
Otherwise 6.26 
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Diagram 6.37 Freeing a QGuickcell (Module IEAVGM00) 


C 


Ce ee ee ee eg eee te Pe > ear a i ae es 1 
| JROUTINE | { 
| NOTES | NAME {LABEL | 
Pes reas ne a ee ee ee S265 > 
| The routine determines the address of the quickcell |QCFREE | | 
| by adding GCORIGIN and QCOFFSET. | | | 
| | | | 
| 2 |QCFREF |QRELEASE| 
| | | 
| 3 |QCFREE |QCHECKOK| 
| | | | 
| 4 The next quickcell address equals the previous address _ | | | 
| plus the length of the quickcell. | | | 
| | | | 
| 5 Each time a gquickcell cof the specified length is | |QCNONE | 
| checked, a counter is decremented. When the counter | | | 
[ equals zero, all of them have been checked. | | | 
Uc a a sh 
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Input 





Diagram 6.38 
Freeing a SWA Segment 


From CSPCHK to 
free a SWA segment 


Processing 
FREESWA 
Register | 
1 Find the SWAB for the segment to be freed. 
Output from Step 2 
. p 

Register 4 : ; 

ec Abba 2 If not found, or if not all pages are free, Type-1 Exit Routine 







Address of TCB exit. (IEAOXEOO) (3.15) 
Register 14 


Register 15 
3 Remove the SWAB from the queue. Return code=X'04' 


4 Free the SWAB from LSQA. RMBRANCH 


5 Retum the segment to the queue of free 


blocks. MRELEASE 





6 Delete the page table. Paging Supervisor 


3.39 


7 Release extemal page storage for the 


segment, pm enn Output from Step 8 


6.40 


8 Post completion, Task Supervisor 


y, 3.8 
Y 


Pann nWWWWBWWUBRVaae’ WRASSE EEE A 











Type-1 Exit Routine 
(IEAQXE00) (3.15) 
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Input 


Register 0 
Subpool number 237 


Register | 


Register 14 


[Retarn aaron — 





From CSPCHK to free 
page ina SWA 


| i | 
Se ae ee eee 


ae eS a i ee ee ee ee 
I 
| 
| 
| 


| 
| 
| 
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Diagram 6.39 
Freeing a SWA Page 


Processing 


FREEPAGE 


Find the SWAB for the page to be freed. 


Output 


If not found, or if page is already free, 


T < . e 
exit: ype-1 Exit Routine 


(IEAOXE00) (3.15) 






Register 15 
Return code=X'04' 








Release real and external page storage 


for the page, Paging Supervisor 


5.20 









Determine if all pages in the segment are Regeten-l2 


now free, ee Return code=X'08' if 


segment is now free 


=X'00" if successful 






Type-1 Exit Routine 
(IEAOXE00) (3.15) 
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Diagram 6.40 
Monitoring the Release 
From FREESWA of External Pages 
Input Processing 
GETAUX PVT 
Register 6 ‘ ie 5 
a a a T Adjust external page sotrage BMABRRRRRABRERSEEEEEGE \ 
. counters, 
Register 14 Y 
faire ARWERWYD) torch committed 
To Caller 


Register 15 
Ut iT | Return code = X'00" | code = X'00' 


From |IEAVPRTO 


TSOAUX 


Register 6 


--—---—-l2 
Register 0 counters. BRR BABAR ee 
Axx by System uncommitted 
DISPINIT p ee 
3 if no specific requests are waiting, Dispatch haw Be TSO committed 








Update externa! page storage 











set all waiting tasks dispatchable. 


inittators 


4. Post any pageable (V=V) task 
waiting for external page 
storage. 





SN SS SSS 






Type-1 Exit Routine 
(1EAOXEOO) (3.15) 
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Diagram 6.40 Monitoring the Release of External Pages (Module IEAVPRTO) 


CS rr yi cpe eae Se nos Pe ae a Ae a a PU ee Oe aes ah RGN egestas op en a ES as b a ae 2 Se aie eae 1 
l | ROUTINE 


a es ee me ce yc a em me ee mm ee ee ee ee ee ee ee ee ee ae ee es 


The GETAUX subroutine is used tc keep track of external 
page storage that backs up pageable regions for batch joks. 
The TSOAUX subroutine is used to keep track of external 
page storage for TSO tasks. 


| 
| 
| 
| 
| 
| 1 The system uncommitted count is increased and the katch 
| committed count is decreased ty the number of bytes 

| requested. 

| 

| 

| 

| 

L 


2 The system uncommitted count is increased and the TSO 
committed count is decreased by the number of bytes 
requested. 
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The timer supervision routines support 
the System/370 time-of-day clock, clock 
comparator, and CPU timer. The routines 
use these to obtain the date and time of 
day, schedule activity after a specified 
interval, and schedule activity for a spe- 
cific time of day. 


The TOD (time-of-day) clock is a 64-bit 
incrementing binary counter. It is used to 
measure elapsed time in microseconds and is 
incremented by adding a one in bit-position 
51 every microsecond. The clock, which 
runs continuously, contains the total numb- 
er of microseconds that have elapsed since 
January 1, 1900, 00:00 hours, Greenwich 
mean time. Timer supervision uses the 
time-of-day clock to calculate the time of 
day and to maintain the current date. 


The clock comparator feature causes an 
external interruption when the time-of-day 
clock reaches or passes the value specified 
in the clock comparator and the CPU is 
enabled for clock comparator interruptions. 
The interruption code is X‘'1004". Timer 
supervision uses the comparator to service 
requests to schedule activity after a spe- 
cified interval of real or wait time, or to 
schedule activity for a specific time of 
day. 


The CPU timer is a 64-bit decrementing 
counter. One is subtracted from bit- 
position 51 every microsecond while the CPU 
is executing instructions or iS in a wait 
state. An external interruption occurs 
when the value placed in the CPU timer 
reaches or becomes less than zero and the 
CPU is enabled for CPU timer interruptions. 
The interruption code is X*1005‘. Timer 
supervision uses the CPU timer for timing 
task intervals. 


Timer supervision performs the opera- 
tions requested by TIME, STIMER, and TTIMER 
Macro instructions, and processes timer 
interruptions. 


For TIME macro instructions, the TIME 
routine returns the date and time of day to 
the requester. 


For STIMER macro instructions, the STIM- 
ER routine sets a programmed timer (the 
clock comparator or the CPU timer) to a 
requested time interval so that it expires 
after the specified time interval or at a 
specified time of day. When the requested 
interval expires, the CPU generates a CPU 
timer or clock comparator interruption 
which the Timer Second-Level Interruption 


HOW TIMER OPERATIONS ARE SUPERVISED 


Handler processes. If the requester speci- 
fies the TASK timing option, the time 
interval is decremented only when the 
requester‘s task is active. If the requ- 
ester specifies the WAIT timing option, the 
requester‘s task is placed in the wait con- 
dition until the interval expires. If the 
register specifies the REAL timing option, 
the interval is decremented continuously. 


For TTIMER reguests, the TTIMER routine 
returns the amount of time remaining in an 
interval previously set by an STIMER macro 
instruction. The routine can also cancel 
the remaining time interval if so 
requested. 


Timer supervision maintains two queues 
of TQEs (timer queue elements): one for 
TASK timing requests and the other for REAL 
and WAIT timing requests. The TQES are 
constructed ry the STIMER routine, and each 
element represents a request for a type of 
timed interval. Each new TQE is placed on 
the appropriate queue in the order in which 
the requested interval expires. When an 
interval expires, a timer interruption 
occurs. The Timer Second-Level Interrup- 
tion Handler removes the top element from 
the appropriate timer queue and determines 
what action to take. 


Timer supervision also maintains a timer 
data area (IEATPC). This area contains: 
(1) predefined TQEs that represent per- 
Manent control program requests for timer 
services, and (2) information used during 
timer supervision processing. 


The four major routines and two queues 
in timer supervision are described briefly 
in the following paragrarhs. 


TIME ROUTINE 


(Diagram 7.2) 


The TIME routine supplies the current 
date and time of day. Initially, the 
operator uses the SET command to provide 
the control program with the date and the 
time of day at the computing location 
(local time of day). Timer supervision 
routines change the date at midnight and 
keep track of elapsed time. The TIME rou- 
tine obtains the current local date, con- 
verts the value in the time-of-day clock to 
local time, and returns both values to the 
user. 
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STIMER ROUTINE 
(Diagram 7.3) 


The STIMER routine processes requests 
for interval timing based on task execution 
time or real time. The routine schedules 
the placement of a timing interval into 
either the clock comaprator or CPU timer, 
according to the timer service requested in 
the STIMER macro instruction. For each 
STIMER macro instruction, this routine 
builds or uses an existing TQE into which 
it places a summary of the information con- 
tained in the STIMER macro, including the 
information that will be needed when the 
interval expires. This routine then places 
the element on either the CPU timer queue 
(for the TASK timing option) or the clock 
comparator queue (for the REAL or WAIT tinm- 
ing option). 


TTIMER ROUTINE 
(Diagram 7.4) 


The TTIMER routine supplies the time 
remaining in a previously requested interv- 
al, cancels previous timing requests, or 
both. To determine remaining time, the 
TTIMER routine subtracts elapsed time from 
the time at which the interval will expire. 
To cancel a previous request, it removes 
the corresponding element from either of 
the two timer queues. 


TIMER SECOND-LEVEL INTERRUPTION HANDLER 
(Diagram 7.5) 


The Time Second-Level Interruption 
Handler (Timer SLIH), processes timer 
interruptions. It removes the TQE, whose 
interval has completed, from a timer queue 
and flags the interval complete. It per- 
forms any actions required upon expiration 
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of the interval and obtains new intervals 

to be placed in the clock comparator. In 

addition, the Timer SLIH schedules or per- 
forms the following services: SMF timing, 
CVTDATE update, time-limit expiration, TSO 
timing, and paging supervision timing. 


TIMER QUEUES 


As mentioned previously, the timer 
Supervision routines maintain two queues of 
timer queue elements: one for TASK timing 
requests and the other for REAL and WAIT 
timing requests. 


Whenever a task requests a timer ser- 
vice, the STIMER routine builds a TOE. If 
the request is for TASK timing, the dis- 
patcher requests that a timer supervision 
routine (Timer Engueue) place the new TQE, 
and other related TOES, on the CPU timer 
queue when the requesting task is dis- 
patched. The timing interval requested by 
the dispatched task is placed in the CPU 
timer and decremented. If the task becomes 
nondispatchable, the remaining interval is 
saved. When the interval expires, the CPU 
timer causes an interruption. (See Figure 
7-1.) 


When a task requests REAL or WAIT tim- 
ing, the STIMER routine converts the 
requested interval to the value that the 
time-of-day clock will contain when the 
requested interval expires. The TQE is 
placed on the clock comparator queue 
according to its time of expiration. The 
first TQE to expire is first on the queue, 
the second is second, and so on. The 
interval for the first TQE on the queue is 
converted to the value that the TOD clock 
will contain when the requested interval 
expires. This value is placed in the clock 
comparator, which causes an interruption 
when the value in the TOD clock equals or 
exceeds the value in the clock comparator. 
(See Figure 7-2.) 


Timer Data Area 


(IEATCP) 


(1) Timer supervision routines maintain a pointer to the head of the CPU timer 
queve in the timer data area (IEATPC). 


(2) When a task is dispatched, the dispatcher passes to the Timer Enqueve routine 
the addresses of all TQEs related to the task about to be dispatched. The 
Timer Enqueve routine places the TQE(s) on the CPU timer queve. If it 
places a TQE at the head of the CPU timer queue, it places that TQE's re- 
quested interval in the CPU timer. Ifa TQE is not placed at the head of 
the queve, the Timer Enqueuve routine adjusts that TQE's requested interval 
to account for the intervals contained in any TQEs ahead of it on the queve. 
A given task can request only one TASK timing interval at a time. However, CPU Timer 
the control program requests timing of a user task in order to provide services 
for the entire system. These TQEs are “related"to the user TQE. The 
dispatcher times tasks for automatic priority grouping and time-slicing, the 
initiator for job-step timing, and so on. 


(3) The dummy TQE is an internal TQE predefined in the timer data area. It 
is constructed to time the maximum allowable interval. When no other 
TQEs are on the queue, the value in the TQEVAL field of this TQE is placed 
in the CPU timer to prevent unexpected CPU timer interruptions. 





Figure 7-1. Operation of the task timing queue (for TASK timing). 


Timer Data Area 


Qa) Timer supervision routines maintain a pointer to the head of the clock comparator 
queue in the timer data area (IEATPC). 


(2) The STIMER routine calculates the value that the time-of-day clock will contain 
when the user's requested interval expires. This value is placed in the TQEVAL ke 


e t p 
field of the requester's TQE. The TQEs are placed on the clock comparator queue (2) Clock Compatater Queue 


according to their time of expiration. The TQE whose interval expires first is first 
_— on the queve, and so on. The expiration time (TQEVAL) of the first TQE on the TQE 
queue is placed in the clock comparator, 


(3) The paging supervision TQE (PGSUPTQE) is an internal TQE predefined in the TQEVAL 


timer data area. When the interval it represents expires, paging supervision pa ae, Clock 


gathers paging statistics. Comparator 
: TQE : 


(4) The TSO Driver TQE (IEATSELM) is an intemal TQE predefined in the timer data 
area. It is used by the TSO Driver for time-slicing. 


The 10-minute SMF TQE (TENMELM) is an internal TQE predefined in the timer 
data area. This 10-minute element is used to cause an interruption every ten (3) y Paging Supervision TQE 


minutes for SMF wait-time collection, When the interval expires, the Timer 
SLIH adds the wait time accumulated to the total wait time kept in the system 
management control area. 

The Midnight TQE (MIDNTQE) is an internal TQE predefined in the timer data 


area, This TQE is used to determine when midnight occurs so the date in the CVT ITSO Driver TQE 


can be updated. The TQE is also used by the TIME routine to calculate the time 
of day. 


10-Minute SMF TQE 


(6) Midnight TQE 





( Figure 7-2. Operation of the clock comparator queue (for REAL and WAIT timing). 
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TTIMER Routine 
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Timer Dequeue 
Routine 


7.7 
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azednsg xzautL 


UOTSTA 


TOS 


TIME Macro Instruction 
issued (SVC 11) 






SVC First-Level 
Interruption Handler 
SVC Second-Level 
Interruption Hand] er 


TIME Routine 
e Determine time of 
day and date. 


















e@ Convert time of day 
to format requested, 


e Return time and date 
to issuer. 


7.2 


Return to Issuer 


SVC Interruption 


Diagram 7.1 


Overview of Timer Supervision 


STIMER Macro Instruction 
Issued (SVC 47) 


TTIMER Macro Instruction 
Issued (SVC 46) 


Clock Comparator 
or CPU Timer 
Interruption 




















SVC Interruption 
SVC First-Level 
Interruption Handler 


SVC Second-Level 
Interruption Handler 


SVC Interruption 













SVC First-Level 
Interruption Handler 


SVC Second-Level 
Interruption Handler 


STIMER Routine 
e Determine the time interval at 
which the issuer has requested 

a timer interruption to occur. 





External First-Level 
Interruption Handler 









Timer Second-Level 
Interruption Handler 









e@ For CPU timer interruptions, remove 
the TQE (timer queue element) from 
the task timing queve. For clock 
comparator interruptions, remove 
the TQE from the clock 


comparator queve. 





TTIMER Routine 
e Calculate the time 
remaining in the 
requested interval 
and return that 
information to the 
issuer in the 
specified format. 



















Timer Enqueve Routine 


Place the TQE (timer queue 
element) on the correct 
timer queue. 






If requested, schedule a user- 
specified exit routine to receive 
control. 






e@ Queue the request on either the 
CPU timer queue or the clock 
comparator queue. 



















For WAIT requests, post the TQE 
ECB for the issuer of the request. 


If the issuer 
requested, cancel 
the interval and 
remove the issuer's 
request from the 
timer queue, 


e If the issuer requested, issue a 
WAIT SVC to place the issuer's 


task in wait status. 





Timer Dequeue Routine 













Remove the TQE (timer Mark the interval complete. 


queue element) from the 
correct timer queue. 





Perform any requested or scheduled 
system services (SMF, CVTDATE 

update, time limit expiration, TSO 
timing, etc.). 


Tad 


Return to Issuer or 
Dispatcher (if 
WAIT was issued) 


Return to Issuer 


Return to External First-Level 
Interruption Handler 


Remove the TQE from the 
correct timer queve. 


Timer Dequeue Routine 
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Diagram 7.2 
TIME Routine 
BI From SVC SLIH or 
Time Sharing Interface 


Input | Program (SIP) ~=»s- Processing Output 








PJ From SVC SLIH 


IGCO11 
Register 0 


Address of 8-byte area for 
MIC requests 


Register 1 


Register 1 










1 Extract local date from CVTDATE. 


Local date 


SSS 
Register 0 
Register 15 


2 Calculate the time of day in microseconds. 


for TU (timer units: 
1 TU = 26.04166 . 
microseconds) 3 Convert the time of day to the format requested 
in the TIME macro instruction: 


for BIN (binary) 





For MIC requests with an invalid "area" 
specified 


occoc004 


for DEC (packed 
decimal) 


for MIC (binary) ; 
é For valid MIC requests Register 0 


For TU, BIN, and DEC requests 
Register 1 
Bit 0 = 1 to designate TSIP Caller 8-Byte User-Specified 
branch entry 
Time of day in 
Register 14 microseconds 
Register 0 
Time of day in 











format specified 
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Diagram 7.2 TIME Routine (Module IEAVRT01) 
poe ee eee en ee eee See oe ee eee 


The TIME routine services TIME macro instructions. It | 
retrieves the local date, calculates the local time of 
day, and returns both to the requester specified in the 
macro instruction... The routine is a type-2, partially- 
enabled SVC routine. It is entered from the SVC Second- 
Level Interruption Handler (SVc SLIH) after an SVC 11 
(TIME SVC) is issued, or from the Time Sharing Interface 
Program (TSIP) by a branch entry) -- to obtain the time 
of day in timer units. 


| 
| 
| 
{ 
l 
[ 
[ 
| 
Register 0 contains the address of an 8-byte area in | 
which the time of day is placed if the MICVL option is | 
Specified by the requester. Register 1 specifies the | 
format in which the timwe of day is to be returned to the| 
requester. | 
[ 
l 
[ 
| 
| 
| 
| 
[ 
| 
[ 
| 
| 


If the TIME routine is entered prior to system initial- 
ization, the date has not yet Leen set (CVTDATE=0 or 
MNIGHT=0). Register 0 is set to zero, register 1 is set 
to X'F*, and the TIME routine returns. 


The time-of-day (TOD) clock contains a count of the 
total number of microseconds that have elapsed since 
January 1, 1900, Greenwich mean time (GMT). When a 
request for the time of day is made, this elapsed time 
must be converted to the number of microseconds that 
have elapsed in the day at the local ccmrputing center 
(local time). 


To convert the TOD clock value to local time, the TIME 
routine maintains a field (MNIGHT) in the midnight TQE, 
which contains the value that the TOD clock will ccntain 
when midnight occurs (local time). This field is 
initially set when the operator issues the SET conmand. 


The following method is used to calculate the local time 
of day: 


MNIGHT field (number of micrcseccnds TOD clock will 
contain at local midnight) 

- TOD clock (number of microseccnds elapsed since 
January 1, 1900, GMT) 

MICSEC value (number of microseconds left in the day 
at the computing location) 


in ee ee ee ee 


Then: 


86.4 x 109 (number of microseconds in 24 hours) 

- MICSEC value 

Local time of day at the comcuting location in micro- 
seconds. 
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| NOTES | 


NAVE 


-—— 


—— YH 


4 
» 
32] 
tr 
ct 
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TDATE 


HOS 


Input 


High-order byte -- Option flags 


Low-order 3 bytes -- Address of a 
user-specified exit routine, or 0 


Register | 


Address of the user-specified 
timer interval 


Address of CVT 
Address of TCB 


Address of RB 


Return address 





From SVC SLIH ‘ 
1 Processing 


IGC047 


Convert the interval to microseconds 
or TOD clock units, 


If a timer interval already exists for 
the task and the interval is incomplete, 
reuse the TQE, 


If a timer interval has completed, 
reuse the TQE. 


If a TQE cannot be reused, acquire 


storage for a TQE and initialize it. 


Place the interval (calculated in 


Step 1) in the TQE, 


Place the TQE on the correct timer 
queue. 


If WAIT is specified, issue a WAIT 
macro Instruction. 


To Calle: or 
Dispatcher 





Diagram 7.3 
STIMER Routine 


Timer Dequeve Routine 


IEAQTDOO 


Remove TGE from timer 


queue. 
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GETMAIN Routines 


IGC004 


2 


Timer Enqueve Routine 


IEAQTEOO 
Place TQE on CPU timer 
queue for TASK timing or 


Output 


clock comparator queue 


for REAL or WAIT timing. 
7.6 


User's ECB 






BABAR RARAESSESASSREREERE GEER EEREREEEEEEED TQEECB = 0 : 
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Diagram 7.3 STIMER Routine (Module IEAVSTQOOQ) 





a a a a a a a aaa mm a a Tt “V- oo-— 1 (oor SS See Hana ne eS ee Sea a Secs eS SSS = freien orate Too tes 1 
| | RCUTINE | | | | RCUTINE {| | 
| NOTES | NAME | LABEL | | NOTES | NAME | LABEL | 
Bee SSH eS Sa a ee Sea aa ee { bee en tr tr rs en en fo enn nn fof 
| The STIMER routine processes STIMER macro instructions. |STIMER | | | Register C STIMER Macro |STIMER | | 
| The routine sets a programmed timer to expire either: | | | | Option Flags Instructicn Option | j 
| (1) after a specified time interval, or (2) at a spfeci- | | | | OOO genes TUINTVL indicates the | | 
| fied time of day. The task requesting the timed inter- | | | | O01 acess BINTIVL format | | | 
| val is placed in wait state during the interval if the | | | | OO 6 ces MICVL of specified | | | 
| task so specifies. The STIMER routine also frepares to | | | | COULD ede DINTVL time interval | | | 
| pass control to a user-specified exit routine upcn [ | | { eA verecets LTOLD | | | 
| expiration of the interval if requested to do so. | | | | aaeee «000 TASK | | | 
| | | | | eerew 2 OOL WAIT | | | 
| Restrictions: | | | | eeee 2011 REAL | | 
| | | | | | | | 
| e If an STIMER macro instruction is issued by a user- | | | | Pegister 1 | | 
| specified exit routine, the macro instruction wili be | | | | Option Register Contents | | | 
| executed. However, the macro instruction must not | | | | DINTVL, MICVL, LTOD The address of an 8-byte | | | 
| specify the same exit routine. If it does, an in- | | | | area containing the time | | | 
| finite loop may occur. | | | | vaine | | | 
| | | i | | | 
e The specified time interval should be less than 24 | | | { BINTVL, TUINTVL The address of a 4-kyte | | | 
| hours. If greater, the interval is reduced to 24 | | | | area containing the time | ] | 
| hours. | | | | value | | | 
| | | | | | | [ 
| e After an interval expires, the task is placed inthe | | | | 2 If the task has an outstanding timer WAIT request the | | TCBT | 
| ready state and competes for control of the CPU. A | | | | waiting RB is located. If the wait count (REWCF) in the| | | 
| user-specified exit routine wiil not receive ccntrol | | | | RE is not zero, it is decremented by one befcre pfroces- | | | 
| until the task becomes the highest priority ready task | | | | sing continues. | [ | 
| and is dispatched. | { | | | | | 
| | | i he | |TIRBTST | 
| *e A task can have only one outstanding STIMER service | | | f | | | 
| request. A second STIMER macro instruction issued for| | | | | | TSETCORE | 
| the same task overrides the first. | { | | | | | 
b_-~_______——___~~-~~ ~~~ —~-~~---———- --— ----—-- -— - - --—- - + 41—---——-—~ 41—-~-—_——— J | 7 Issuing the WAIT macro instruction places the user's | | | 
| SVRB in the wait state. When the interval has expired, | | | 
| the Timer SLIH costs the TQEECH field. | | | 
| Cee am eespee Nec eee Ne AN a tN ee Bere Eee fet eee J 
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Input 





2 | Register 0 
Address of 8-byte area 
if MIC is specified 


Register 1] 


Bits 0-29 --0 
Bits 30-31 -- Option flags 


Option Flags 
Bit 30 = O TU specified 
Bit 30=1 MIC specified 


Bit 31 = 1 CANCEL 
specified 


Address of CVT 


Address of TCB 


Address of RB 


Return address 


4 From SVC F 
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Processing 
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IGC046 


\f the task has no outstanding timer 
requests 


If the interval has completed, free the 
storage for the TQE and mark the 
interval complete in the TCB. 


Calculate the time remaining in the 
interval , 


IF TU was specified 


If MIC was specified 


If CANCEL was specified: 


For a WAIT time interval, decrement 
the RB wait count by 1. 


For a WAIT, REAL or TASK time 
interval, cancel the interval and free 
the storage for the TQE. 


ee ee 
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Diagram 7.4 
TTIMER Routine 


Output 


Register 0 


Register 0 
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Caller 


Caller 


Timer Dequeue Routine 


[EAQTDOO 
Remove the TQE from the 


timer queue. 


7.7 


FREEMAIN Routines 


IGC005 
— 





Register O 


Remaining interval in 
timer units 


8-Byte Area 


Remaining interval in 
microseconds 
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Diagram 7.4 TTIMFR Routine (Module IEAVSTOO) 


Bo eS Se ed a gn ang he ene ap ere Soe te paseo ag ae 
[ROUTIN 
| NAME 


SS a SD aS ay SG SS a aes ce ce ce ee ee ee ee ee ee ee ee a ee 


The TTIMER routine processes TTIMER macro instructions. |TTIMER 


The routine calculates the time remaining in a timer | 
interval and optionally cancels that interval. The time| 
remaining is returned to the requester as specified in | 
the macro instruction. If the WAIT parameter was speci-| 
fied in the STIMER macro instruction that estaklished 
the interval, the interval is also canceled. This rou- 
tine is a type-2, partially-enabled SVC routine. It is 
entered from the SVC SLIH after an SVC 46 (TTIMER SVC) 

is issued. 


If the TUINTVL option is specified, the time remaining 
in the interval is to ke returned in register 0 in timer 
units (the least significant bit = 26.04166 ricro- 
seconds). 


If the MICVL parameter is specified, the time remaining 
in the interval is to be returned in the area whose 
address is specified in register 0. Bit 51 equals 1 
microsecond. 


For TASK time intervals: 


remaining interval equals the value in the CFU 
timer. 


e If the TQE is not first on the queue, the remaining 
interval equals IQEVAL minus INTERVAL plus the value 
in the CPU timer. INTERVAL is a field in the timer 
data area. The field contains the amount of time 
that will have elapsed (when the CPU timer reaches 
zero) since the first TQE for the current task was 
put on the CPU timer queue. 


For WAIT and REAL tine intervals: 


e The value in the TOD clock is flaced in the IEACLOCK 
field. This value is suktracted from the TQEVAL 
field of the requester's TQE to determine the 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
e If the TCE is first on the CPU timer queue, the | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
l 
| 
| 
| 
{ 
remaining interval. | 
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¢ Diagram 7.5 (Steps 1-6) 
Timer Second-Level Interruption Handler 


Processing 


Input 


JEAOTI00 


Interruption code in So Obtain the address of the first TQE 


location X'86": from either the clock comparator queve 
or the CPU timer queve (depending on 
1004 for clock the cause of the interruption). 


comparator 
interruptions 


2 lf the TQE is the TDUMYTQE, reset 
the CPU timer to the TDUMYTQE To External 
1005 for CPU jakervall: FLIH 


timer 
Timer Dequeve Routine 


interruptions 
IEAQTDOO 





3 Dequeue the expired TQE. 


Remove the TQE from the 
timer queue. 







Register 2 


Return address 


7.6 
TSO Driver 
G lf the TQE belongs to the TSO Driver 


and TSO is active, notify the driver TSEVENT = TSLICE 
that the TSO time slice has expired. 





To External 
FLIH 


5 if the TQE belongs to a TSO task that TSO Dri 
has been swapped out and TSO is ore 


active, notify the TSO Driver. 


Swaps in the task. 
(TSEVENT = USRRDY) 





To External 


FLIH 


6 if the TQE is a WAIT TQE, post the mes POST Routine 


TQEECB and mark the TQE complete. 
IGCO56 


3.8 


To External 


FLIH 


(Continued at Step 7) 
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Diagram 7.5 (Steps 1-6) Timer Second-Level Interrupticn Handler (Module IEAVTIOQO) 


Ge gy ee ee ee Real : ieee aie ay 

[ROUTINE | | 
| NOTES | NAME | LABEL | 
Pee ee ee a ee ee cranes a ars { 
| 2 The dummy TCE is predefined in the timer data area | Timer | | 
| (IEATPC). It contains a value greater than the naxinum |SLIH | | 
| allowed user interval. The dummy TCE is scheduled when | | | 
| no other TGEsS are on the queve in order to prevent unex- | | | 
| pected CPU timer interruptions. | | | 
| | | | 
| 3 | | TICQTQF | 
| { | i 
| If the TQE relongs to the TSO Driver but TSO is not | | | 
| active, the Timer SLIH exits to the External FLIH. | | | 
| | | | 
| 5 The TSO Restore routine will complete processing of the | | | 
| TOE after the TSO task is swapped in. | | | 
| | | | 
| 6 | |TIWAIT | 
a se a a ee ee ie es 5 ae eee Pea as aoe J 


, Diagram 7.5 (Steps 7-8) 
Processing Timer Second-Level Interruption Handler 


OTS 


7 = Supervisory TQEs 


Output 


A, If the TQE is the SMF 10-minute 





TQE: 
P . . System Management 
© Add SMF information from \ NAN NANANNANAAAS EE Fee ace MCA) 
the page vector table to the 
SMCA. 
e Extract the amount of wait VWABRRRERARERRRERRAR REAR RRSGE RARER’ SMCAWAIT = accumulated 
time from SYSWAVE and add ‘ wait time 
it to the accumulated wait 
time. 


B. If the TQE is the midnight TQE: 


e Update the date. MWABRRRRRARE EERE EEREGRQ@aRaEagGGa by CVTDATE = current date 


e If TSO is active, notify the TSO Driver 
TSO driver that midnight has ae 
as TSEVENT = CHGTOD 


Paging Supervisior 


C. If the TQE is the paging supervisor IEAPDSBL 
TQE, pass control to the paging 
supervisor. The Task Disable routine 

in the Page Replacement 


module (IEAPRPLS) 
determines whether page 
thrashing is occurring 


5.19 


IEAQTEOO 


Place the TQE on the 
clock comparator queue. 


7.6 





D. Reschedule the TQE 












To External 
FLIH 
8 sif no exit routine is to be scheduled, 
set the interval complete. To External 
FLIH 


(Continued at Step 9) 
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Diagram 7.5 (Steps 7-8) Timer Second-Level Interruption Handler (Module IEAVTI00) 
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SSS SSS SS —— == ———SS==-—— 1 
| | ROUTINE | | 
| NOTES |NAME |LABEL | 
<a oe ee Seen Sealer 
| A. | Timer | TISMFMID| 
| | SLI8 | | 
| | | | 
| Cc. The paging supervision TOE is used to determine how | | { 
| much paging occurs within a certain time period. | | | 
| The Task Disable routine will set a task nondis-— | | | 
| patchable if too much paging (thrashing) is Lkeing | | | 
| done. | | | 
[ | | l 
| D. The value in the TOD clock is added to the TQEVAL | | | 
| field of the TQE and placed in TQEVAL. | | TSNQUEUE| 
[ | | | 
| 8 This is a user's TQE | |NOTUSER | 
| | | | 
| 1 The Timer SLIH adds the following page vector takle | | | 
| (PVT) fields to the SMF control area (SMCA): | | | 
| | | | 
| IVT Field SMF Field Field Contents | | | 
| PVTNPOUT SMCAPGOT Number of page-ocuts | | | 
| PVTINPIN SMCAPGIN Number of page~ins | | | 
| PYTSPOUT SMCASPCT Number of SWAP page-outs | | | 
| PVTSPIN SMCASPIN Number of SWAP rage-ins | | | 
{ PVINSWAP SMCAPGNS Number of regions swapped | | | 
| in and out | | | 
| PVTNPMIG SMCAPGM Pages migrated | | | 
| PVTNPEEC SMCAPGEL Number of pages reclaimed | | | 
| PVTNRM SMCAPGNM Regions migrated 1 | | 
[ [ | l 
| The Timer SLIH also places the time of day that the | | | 
| 10-minute TQE expired in the field SMCATEXP. | | | 
a a a a a ee a ORR Nee ener ern 
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; Diagram 7.5 (Step 9) 
Processing Timer Second-Level Interruption Handler 





Q Schedule asynchronous exit routines for 
SMF, job-step timing, wait time 
expiration, and TSO and user requests 
(for REAL and TASK timing requests 
only). 






Output 



















Input to Stage 2 Exit 
Effector 





- To schedule an asynchronous exit for 
TSO and user requests, convert the 
TQE to an IRB/IQE and call the 
Stage 2 Exit Effector. To schedule 
an asynchronous exit to a Time Limit 
Expiration routine (IEATLEXT) for 
an initiator, create an IRB/IQE and 

call the Stage 2 Exit Effector. 










Register 1 

















Complemented address 
of the IQE 








Stage 2 Exit Effector 


|IEAO EFOO 
Place the IQE on the 


asynchronous exit queue. 


3.12 






Register 14 









Return address 





Input to ABTERM routine 














If an initiator's REAL time interval 
has expired and the installation did 
not provide a Time Limit Expiration 
routine, a wait time limit set by the 
WAIT routine has expired. 
Abnormally terminate the task with 
a completion code of X'522', 







Register 0 










Address of the TCB to 
be terminated 










ABTERM Routine 


|IEAOABOO 


Register | 


X'80522000' 


the task. Dump request indicator 
8.12 and the completion 
code, 





Schedule termination of 







To External 
FLIH 
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Diagrem 7.5 (Step 9) Timer Second-Level Interruption Handler (Module IEAVTIOO) 


(Se ee Se oe a eS ee eee Se a es D Res nag gaa aa aia 1 
[ROUTINE | 

| NOTES | NAME {LABEL | 

a> -- === ----= === === == === === === = 2 === 5 === === === === === $--------}-------- 

9 A. | Timer | TNIST | 

|SLIH | CHECKSMF | 


| 

| 

| B. Register 0 contains the address of the TCB to be 

| terminated. This TCE is the subtask of the TCE to 
| which the TQE foints. Upon return from ABTERM, the 
| Timer SLIH moves the TQESAV field to the TCEVAL 

| Field tc restore the time interval in effect when 
| the job step entered the wait state (for dekugging 
| purposes). The TQE type is tnen changed from REAL 
| to TASK. 
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a SS 


hts 


From STIMER, Task Switch, 
TSO, master scheduler, and 
Timer SLIH to place a TQE 
on a timer queue to start 
timing an interval 


Processing 










Register | 


TQE address 


Register 2 


Return address 


The PSW must be in 
supervisor, disabled 
state. 


IEAQTEOO 






If the TQE is already on the queue or 
is complete 





Caller 

















For REAL or WAIT time requests, place 
the TQE on the clock comparator queue. 
























3 For TASK timing requests, place the 
TQE on the CPU timer queue, If the 
requested interval is greater than the 
value in the CPU timer, and the first 

TQE is not the dummy TQE, adjust the 

requested interval to account for any 

time already elapsed in the interval 

currently being timed. (See Diagram 7.7, 

Note 4) 





If the TQE is not at the head of the. 
queue 


Caller 





If the TQE is at the head of the queue, 
place the requested interval in either 
the CPU timer (for TASK timing) or the 
clock comparator (for REAL or WAIT 
timing). 


Caller 


Diagram 7.6 
Timer Enqueue Routine 


9TS 


From dispatcher and WAIT 
routine to remove the TQE 
from the CPU timer queve 
and save the remaining interval 


in the TQEVAL field of the TQE 
Input (for TASK timing requests) Processing 






IEAQTDO} 








Register ] 
TQE address 


Register 2 


Return address 


The PSW must be in 
supervisor, disabled 
state. 






If the TQE is at the head of the CPU timer 
timer queue, set the TQEVAL field 

equal to the value in the CPU timer. 

If not, adjust the value in TQEVAL 

to account for any time already 

elapsed in the interval that was 

being timed. 














Cancel Entry Point 















FEAQTDOO 





2 Remove the TQE from the queve and 
readjust the pointers of the 
remaining TQEs. 









If the dummy TQE now heads the 
CPU timer queve, set the CPU 
timer to the dummy TQE's interval. 














If the TQE at the head of the CPU 
timer queue was removed, reset the 


CPU timer. 


















From ABEND, Timer SLIH, 
and TTIMER to remove a 
TQE from a timer queue 
and to cancel the existing 
interval 










If the TQE at the head of the clock 
comparator queve was removed, reset 
the clock comparator to the interval 
(the TQEVAL field) in the TQE now 
at the head of the queue. 







JEAQTDO2 




















Register 2 


Return address 


The PSW must be in 
supervisor, disabled 
state. 


eee] G&S Calculate and save the remaining 


interval for each TQE on the queve, 





From dispatcher to remove 
all TASK timing TQEs from 
the CPU timer queve when 
switching tasks and to save 
the remaining interval 
value 















7 Schedule the dummy TQE, 








Caller 


Caller 


Caller 


Diagram 7.7 
Timer Dequeue Routine 
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Diagram 7.7 Timer Dequeue Routine (Module IEAVTIO0O) 


The TQEVAL tield is set to: 
cold TQEVAL - INTERVAL + tne value in the CPU timer 
or 
0 if the remaining time is negative 
where: 
"old TQEVAL™" contains the requested interval 
INTERVAL is a field in the timer data area that con- 
tains the requested interval in the TQE now reroved 
from the nead of the queue. 
The requested interval in the TQE must be adjusted to 
account for any time already elapsed in the interval 
that was being timed. The CPU timer is set to: 
TOQEFVAL ~— INTERVAL + the value in the CPU timer 
where: 
TOQEVAL is the requested interval. 
INTERVAL is a field in the timer data area that con- 


tains the interval requested in the TQE now removed 
fror tne head of the queue. 
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Section 8: Termination 519 
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The termination routines cancel requests 
for supervisor operations and free the 
resources and control blocks associated 
with a terminating task. The requests and 
resources include: 

e Engqueued resource requests 
e Unexpired timer requests 
e Incomplete operator communications 


e Exclusively used programs in virtual 
storage 


e Exclusively used data sets 
e Unshared subpools of virtual storage 


The control blocks that are removed from 
their queues and freed include one or more: 


e Task control blocks (TCBs) 

e Request blocks (RBs) 

e Interruption queue elements (IQEs) 
e Supervisor queue elements (SQEs) 

e Queue elements (QELS) 

e Subpool queue elements (SPQEs) 

e Queue control blocks (QCBs) 

e Contents directory entries (CDEs) 
e Timer queue elements (TQEs) 


e Terminal attention exit elements 
(TAXES) 


e The program interruption element (PIE) 
for the task, if one exists 


e Data extent blocks (DEBs) 


There are two types of termination pro- 
cedures: normal and abnormal. Normal ter- 
Mination occurs when a task is complete; 
the last program to be executed for the 
task has completed processing. Abnormal 
termination occurs when some kind of unre- 
coverable error, such as an I/O error or 
program check, has taken place. The task 
must be terminated to prevent waste of sys- 
tem resources. 


Normal and abnormal termination produce 
different results. Normal termination 
frees resources only for the completed task 


HOW TASKS ARE TERMINATED 


Since it has no subtasks. Abnormal ter- 
Mination allows two options: task and step 
termination. In task termination, only the 
resources of the failing task and its suk- 
tasks are freed. In step termination, the 
resources used for the entire job step are 
freed, and, depending on the JCL, the job 
scheduler ignores later steps of the same 
job. 


The general flow of the termination rou- 
tines is shown in Diagram 8.1. 


NORMAL TERMINATION -- EOT (END OF TASK) 


(See Diagram 8. 2) 


When the last program to be executed for 
a task ends, it returns control to the Exit 
routine (SVC 3). The Exit routine branches 
to EOT (end-of-task) routine to free 
resources belonging to the terminating 
task, to schedule an ETXR (end-of-task exit 
routine) if one is specified, to post an 
end-of-task ECB (event control block) if 
cne was specified when the task was 
created, and, if necessary, to ensure a 
task switch. 


In its initial processing, EOT checks to 
see if the terminating task is ina “must 
complete” state, or if there are incomplete 
subtasks of the terminating task. If eith- 
er aknormal condition exists, EOT forces 
abnormal termination by calling the ABTERM 
routine. 


EOT dequeues enqueued resources, sets 
the completion code, and releases resources 
used by the terminating task. To accomp- 
lish these things, the routine does the 
following: ; 


e Releases the PIE (program interruption 
element) if one exists. 


e Purges unexpired TQEs (timer queue 
elements). 


e Purges TAXES (terminal attention exit 
elements). 


e Purges operator communication queues. 
e Closes data sets. 
e Purges asynchronous exits (IQEs). if 


owned by the terminating task, 
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e Frees the task's last-executed program 
(or schedules it for a waiting 
requestor). 


e Purges paging activity and migration. 


e Releases loaded programs and the LLE 
(load list element) associated with 
each program. 


e Purges fixed pages. 


e Frees storage acquired for the task, 
and SPQES (subpool queue elements) 
owned by the task. 


e Dequeues the task's TCB (task control 
block) from the TCB priority queue. 


If an ETXR was specified by the attach- 
ing task, EOT schedules it. If an ECB was 
specified by the attaching task, EOT sche- 
Gules it for posting. When either an ETXR 
or ECB was specified, EOT also ensures that 
a task switch will be made and returns con- 
trol to the Exit routine. If neither an 
ETXR nor an ECB was specified, EOT dequeues 
and frees the TCB and the last RB, frees 
the LSQA, if owned by the terminating task, 
ensures a task switch, and passes control 
to the dispatcher. 


SCHEDULING ABNORMAL TERMINATION -- ABTERM 
(See Diagram 8.10) 


The ABTERM routine schedules abnormal 
termination for system routines that detect 
an error but cannot themselves issue an 
ABEND macro instruction. (See OS/VS Super- 
visor Services and Macro Instructions for a 
description of the ABEND macro instruc- 
tion.) ABTERM also schedules abnormal ter- 
mination for system routines that wish to 
terminate a task other than the one they 
are part of. 


ABTERM performs the following major 
functions: 


e Refreshes the CVT address. 


e Saves the address of the next execut- 
able instruction and the general regis- 
ters; they are displayed by ABDUMP dur- 
ing ABEND processing. 


e Stores the completion code and dump 
option for ABEND. 


®e Builds a TIRB (task interruption requ- 
est block) to cause remaining proces- 
Sing to be done under the TCB specified 
for termination. 


e Schedules abnormal termination of the 
specified task by initializing an SQE 
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with the address of an SVC 13 (ABEND) 
instruction in the CVT. 
ABNORMAL TERMINATION -- ABEND a 
(See Diagram 8.13) 


Abnormal termination occurs because of 
an unrecoverable error, such as an I/0 
error or program check. It may also be 
initiated by a system or user program that 
detects an abnormal condition that could 
cause program damage or incorrect results. 
The task whose program or I/O operation has 
malfunctioned is abnormally terminated 
because continued executing would waste 
system resources. Abnormal termination 
frees the resources for use by other tasks. 


The ABEND routine, which performs 
abnormal termination, may be requested 
directly or indirectly. The request is 
direct when a system or user program issues 
an ABEND macro instruction to terminate the 
current task. The request is indirect when 
a system routine, after detecting an 
abnormal condition, branches to the ABTERM 
routine. The ABTERM routine schedules the 
execution of an SVC 13 instruction for the 
task to ke terminated. The SVC 13 instruc- 
tion, which is executed the next time the 
task to ke terminated is dispatched, causes 
supervisor-assisted linkage to the ABEND 
routine. 


Abnormal termination allows two oftions: 
task and step termination. These are norn- 
ally user options, specified by an orferand 
of the ABEND macro instruction. 


In task termination, only the resources 
of the current (failing) task and its suk- 
tasks are released. This option permits a 
program belonging to a higher-level task in 
the jok step to either continue or termin- 
ate the other tasks of the job step. The 
current task (the task being terminated) is 
treated as the top terminating task (the 
highest-level task in the chain of ter- 
Minating tasks); the current task and all 
its suktasks are abnormally terminated. 


In step termination, all tasks in the 
job step are terminated. The job-step task 
is treated as the top terminating task; the 
chain of terminating tasks originates with 
this task. Task termination of the job- 
step task, the highest-level task in the 
jok step, produces the same result as a 
step termination. 


If the failing task has issued a STAE 
macro instruction or was attached with the 
STAI option, the ABEND routine passes con- 
trol to the ABEND/STA Interface routine 
(ASIR). The STAE/STAI exit routine speci- 
fied by the requester is then given control 


J 


by the requester is then given control 
ASIR. See OS/VS Supervisor Services and 
Macro Instructions for a description of the 
STAE macro instruction. 


The following ciritical system tasks 
have STAR (System Task ABEND Recovery) rou- 
tines which receive control from ASIR if 
the critical system task fails: 


e Communications task 
e Master scheduler task 
e System error task 


e IORMS (I/O Recovery Managenent Support) 
task 


The STAR routines attempt recovery by spe- 
cifying that the system task on whose 
behalf they are processing be retried. 

Both the ABEND and ASIR routines must reco- 
gnize the failure of a critical system task 
and must pass control immediately to the 
appropriate STAR routine. 


If the dump option has been selected 
(either by the user program or the ABTERM 
routine), the ABEND routine invokes the 
ABDUMP routine. The ABDUMP routine dis- 
plays the programs, control blocks, and 
dynamically acquired storage of the ter- 
Minating task, its descendants, and its 
immediate antecedents, including the job- 
Step task. 


An error condition may occur during 
ABEND processing that results in a new 
request for abnormal termination of the 
task that is already being terminated. The 
ABEND routine must be reentered to try to 
complete termination procedures. Reenter- 
ing the ABEND routine for the same task is 
called a recursion. In some instances the 
ABEND routine expects the possibility of an 
ABEND failure, and these instances repre- 
sent valid recursions; the ABEND routine 
processes the second request using any spe- 
cial handling necessary. Invalid recur- 
sions are ABEND failures that were not 
anticipated. They are considered to be 
ciritical errors; the reliability of the 
system is assumed to be in jeopardy when 
one occurs. A critical error causes the 
current task to be set nondispatchable; the 
job-step task is then scheduled for abnorm- 
al termination. 


DUMPING SPECIFIED AREAS OF VIRTUAL STORAGE 
-~- SVCDUMP 
(See Diagram 8.25) 


The SVCDUMP routine is invoked by an SVC 
51 which is issued in a SNAP or SDUMP macro 


instruction. (See OS/VS Supervisor Ser- 


vices and Macro Instructions for a descrip- 


tion of the SNAP macro instruction.) 
SVCDUMP can ke called only by a program 
with protection key 0. If a caller's key 
is not 0, or if the caller requests, 
SVCDUMP passes control to ABDUMP. 


SVCDUMP provides an unformatted dump of 
any area of virtual storage. If the caller 
specifies a TCB, the dump is for that task, 
rather than for the task requesting the 
dump. The dump is written to tape or disk, 
and can ke printed using the system utility 
AMDPRDMP. (See OS/VS Service Aids for a 
description of AMDPRDMP. ) 


The caller may specify the areas of vir- 
tual storage he wishes dumped by providing 
SVCDUMP with a list of virtual storage 
addresses or by specifying any or all of 
the following areas (if the caller speci- 
fies no areas to be dumped, SVCDUMP dis- 
plays all of the following): 


e The nucleus. 
e SQA (system queue area). 


e The region and its LSQA (local system 
queue area). 


e IPA (link pack area) modules associated 
with the task. 


DUMPING SELECTED AREAS OF VIRTUAL STORAGE 
-- ABDUMP 


(See Diagram 8.25) 


The ABDUMP routine is invoked by a SNAP 
macro instruction. The SNAP macro instruc- 
tion, whose expansion contains an SVC 51, 
causes the SVC Second-Level Interrurtion 
Handler (SVC SLIH) to call the SVCDUMP rou- 
tine. The SVCDUMP routine checks the 
ABDUMP parameter list to determine whether 
a SNAP macro instruction has been issued. 
If so, the SVCDUMP routine passes control 
to the ABDUMP routine. 


The SNAP macro instruction can be issued 
by the ABEND routine during abnormal ter- 
rination, or by a user program at any time. 
Thus, ABDUMP processing can provide either 
a formatted abnormal dump or a formatted 
dynamic dump. The ABEND routine can speci- 
fy either a SYSUDUMP or a SYSABEND dump. A 
SYSUDUMP dump consists of major control 
blocks belonging to the terminating task, 
its suktasks, and its immediate antece- 
dents. Programs and dynamically acquired 
Storage belonging to the terminating task 
are also displayed. A SYSABEND dump pro- 
vides the same information as a SYSUDUMP 
dump with the following additions: the nuc- 
leus, LSQA (local system queue area), SQA 
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(system queue area), load modules, sub- 
pool blocks, and the optional GTF (genera- 
lized trace facility) trace. 

If a dynamic dump is requested (the SNAP 
Macro is issued by a user program), the 


storage areas to be dumped are specified by 
the operands of the SNAP macro. (See OS/VS 
Supervisor Services and Macro Instructions 
for information on how to obtain a dump.) 
The use of the ABDUMP routine is 
restricted to tasks that do not have job- 
step tasks within their subtask structure 
at entry to ABDUMP processing. If a task 


has a subtask that is a job-step task, con- 
trol is returned immediately to the caller. 


STA SERVICES AND ASIR (ABEND/STA INTERFACE 
ROUTINE) 
(See Diagram 8.42) 

The STA Services and ASIR routines allow 
a user's abnormal-end exit routine to ana- 
lyze errors before abnormal termination 
proceeds, and if possikle, to schedule a 


retry of a failing routine. 


The STA Services routine is invoked by 
an SVC 60 issued in a STAE macro instruc- 


Index to Diagrams by Module Name for Termination 


Name Number(s) Name Number(s) 
|IEAVTMOO 


IEAVADOD IEAVTMOC 8.46, 8.47 
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tion or ry the ATTACH service routine when 

the ATTACH macro has been issued with the 

"STAI= ™" operand. The routine creates, 

cancels, or overlays an SCB (STA control 

Elock) on a task"s queue of SCBS, to serve J 
aS a means of communication between the STA 
Services, ABEND, and ASIR routines. 


There are three kinds of SCBs: 


e A STAE SCB (there can be several on an 
SCB queue) specifies an exit routine to 
receive control when its associated 
task terminates abnormally. 


e A STAI SCB (there can be several on an 
SCB queue) specifies an exit routine 
(specified by the attaching task) to 
receive control when the attached task 
terminates abnormally. 


e A STAR SCB (there can be only one STAR 
on the SCB queue) specifies an exit 
routine to receive control when a cirt- 
ical system task fails, but it receives 
control only after STAE and STAI exit 
routines have been tried. All per- 
Manent system tasks except the paging 
Supervisor have STAR SCBs. 
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TYPICAL NORMAL TERMINATION 
Active Task SVC DUMP 











e Issues an SDUMP or SNAP macro 
instruction (SVC 51). 






e Dumps storage specified by a 
key-O user. 






e Completes execution. e Branches to ABDUMP to process 


a SNAP request. 













e Issues a BR 14 instruction, 


8.25 


Dispatcher 


e@ Issues an SVC 3 instruction 
(on the last RB). 


Exit 


e Issues a BR 14 instruction. 












Branches to ABTERM if must- 
complete or incomplete subtasks 
exist. 


Frees resources. 


ABDUMP 
Ensures a task switch. 
e@ Dumps control blocks and 


storage, 


Issues a BR instruction. 


Dispatcher 


e Gives control to the active 
task. 


Active Task 


e Executes programs. 





Diagram 8.1 
Overview of Termination 


TYPICAL ABNORMAL TERMINATION 
Active Task STA Services 


e Issues a STAE macro instruction 


(SVC 60). e Specifies the user exit 


routine. 


e Task fails. 





ABTERM 
e Schedules ABEND (SVC 13). 
8.10 
SVC FLIH 


e Records the event, 


SVC SLIH 


e Creates a SVRB. 


ABEND ABEND/SSTA Interface 


e Allows the user to attempt 
recovery. 






e Gives control! to the user exit 
routine. 














Dumps data. Gives control to the user retry 


routine. 












Frees resources, 


@ Returns control to ABEND if 
a user retry routine is not 
specified, 











Ensures a task switch. 





Issues a BR instruction. 
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Dispatcher 


e Gives control to the active 
task. 


Active Task 


e Executes programs. 
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Diagram 8.2 
Overview of EOT Routines 


Exit Routine 





(Enters EOT when it encounters an end-of -task condition) 


EOT Routine 


EOT Mainline Processing 


Set the completion code. 

Dequeue serially reuseable resources. 
Release resources no longer needed. 
Schedule an ETXR if requested. 


Post the ECB that was specified when the task was 
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From the Exit routine (3.14) to free Processing 


resources, schedule an ETXR if 
requested, and post an ECB if requested 


EOT 
Input eS == 1. If the task is in must-complete status 


Register 2 
Base address of resources). 


Exit routine 


Register 3 
Address of CVT 


If there are any subtasks not detached 


Register 4 


Address of TCB 


Register 5 


Add f top RB 
ress of top Set the completion code. 


CB Release resources no longer needed: 


TCBFLGS 


A. Release the PIE. 


C. Purge operator communication 


queues, 


B. Purge unexpired TQEs and TAXEs. 


D. Allow asynchronous page-in, fix, 
or migration requests to quiesce. 


E. Close all open data sets. 


Dequeue any serially reuseable resources 
never dequeuved (except must-complete 
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(Continued at Step 5F) 
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Diagram 8.3 (Steps 1-5E) EFOT Mainline Processing (Module ILEAVETO0O) 
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| NOTES | NAME 

| ~--------------~--------~------------------------=----------}-------- 
| 1 TCBFLGS, set with TCBFIMC, or TCERFSMC means that this | ECT 

| task is in must-complete status. | 

| | 

| 2 TCERQFL, when set, means the terminating task is enqueued | 

| on resources. (See “Secticn 3: Task Supervision” for | 

| information on the ENQ Manual Purge routine.) | 

| | 

| 3. TCELTC is the suktask pointer. It should contain 0. | 

| | 

| The task that attached the terminating task checks | 

| the completion code to determine the subtask's status, | 

| but only if the terminating task was attached with the | 

| ECB or ETXR operand. | 

| | 

| 5 A. ETCLOSE issues a GETMAIN request fcr a CLOSE | 

| parameter list and issues a CLOSE macro instructicn | 

| for each data set on the TCEDER queue. TCEPIE | 

| contains the address of the PIE, or 0 if there is | 

| no PIE. It is set by the SPIE routine. | 

| | 

I B. A TCE represents a request for a timer interval thet| 

| has not expired. | 

| | 

| c. TCBFA, when set, means the task has abnormally ter- 

| minated, in which case the WTOR purge is bypassed | 

| now and performed later by ABEND. The WTOR Purge | 

| routine requests the operator to cancel outstanding | 

| replies to messages from this task. | 

| | 

| For further information abcut the WTOR Purge rou- | 

| tine, see OS/VS Jok Management Logic. | 

| | 

| E. MTCBDEB ccntains the address of the first [FB (data _ | 

| extent block). The DEB queue contains pointers to | 

| all DCBs for a task. | 
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Diagram 8.3 (Steps 5F-9) 
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Diagram 8.3 (Steps 5F-9) EOT Mainline Processing (Module IEAVETOO) 
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5 F. The Dequeue IQE sukroutine removes any ICEs (inter- 
ruption queue elements) belonging to the terminating 
task that have not yet been scheduled. After reg- 
isters have been saved the asynchrcnous exit queue 
is located (FLCAEQJ) and the first ICE is obtained. 
If there are no IQEs, execution continues at 
label DONEi. If the IQE is for tne terminating 
task, it is dequeued; otherwise, the next IQE is 
obtained. After each IQE has been dequeved, a 
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keen dequeuved (FLCAEQK). If not, the next ICE is 
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restored and control returns tc EOT Mainline 
processing. 


G. If graphic devices are not included in the systen, 
the Graphics EOT routine immediately returns to 
EOT. 


For further information about the Graphics EOT 
routine, see OS/VS Graphics Access Method Logic. 


L. On return from the Release Storage subroutine, 
register 3 is reset to the address of the CVT in 
case the address was destroyed. 
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Free the TCB and RBs, FREEMAIN 





Free the LSQA if the terminating task 


RMBRANCH 
6.1 
owns the LSQA, FREEMAIN 


RMBRANCH 
Free subpool 249, 


6.1 





Dispatcher (3.17) or 
ABEND (8.20) 
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Diagram 8.4 Erase TCB Subroutine (Mcdule IEAVETOO) 


ear rg ee gg See ay re ee te te ae ig ae ne 
| | ROUTINE 
| NOTES | NAME 
|--—-----~-------------------------------------------------- 4-------- 
1 iIEATCBP+4 contains the address of the current (old) TCE. |IFAQERA 


Pc ce re 


N 


SS 


a A a A ee ce ee ee ce ee ee ee ee ee ei ee a ee ee 


TCBBACK contains the address of the next higher-friority| 
TCB. If the new (IEATCBP) and old (IEATCBP+4) pointers | 
are equal, no higher-priority task is ready. The new 
TCB pointer is set to 0 as indicated and the old TCB 
pointer is set equal to TCRBACK. If the new and old 
pointers are not equal, a task switch is already indi- 
cated; only the old TCB fointer is set equal tc TCEPACK. 
IEATCBO is set in the flag byte of the old TCB pointer 
to prevent the dispatcher from saving the flcating-foint 
registers. 


| 
| 
| 
| 
| 
| 
| 
| 
TCBLTC points to the last attached subtask. If the ter-| 
minating task is the last attached subtask, TCELTC in | 
the attaching task must Le set to equal the terminating | 
task's preceding same-level subtask (TCBNTC in the ter- | 
Minating task‘s TCE). If the terminating task is not | 
the last attached subtask, only the subtask chain must | 
be changed: the TCBNTC field of the following subtask | 
must be changed to equal the TCBNTC field of the ter- | 
Minating task. | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


If the terminating task does not own the LSOQA, the TCB 
is freed from the attaching task"s subpool 253. If the 
terminating task does own the LSQA, the TCB is freed 
explicitly since it is embedded in the LSQA. It is 
freed in Step 6 when the LSQA is freed. 


TCBLSQA, when set, signifies that this task owns the 
LSQA, which should be freed. If entry is frcom AFENC, 
return is made to ABEND. Otherwise, the dispatcher 
receives control. 


——— — — + 4 


—-L_____ ——— 


| 
| 
| 
| 
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| 
| 
| 
| 
| 
| 
| 
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Diagram 8.5 (Steps 1-8) 
Dequeue TCB Subroutine 
From EOT (8.3) or ABEND (8.21) to remove 


the terminating task's TCB from the task queue, Processing 


TJBX queue, and time-slice queve 


|EADQTCB Output 
1 If the specified task is not a TSO task =p 10 





Inpu 2 Obtain the address of TJB and TJBX. me GETTJB Register 2 


(Subroutine of Exit) = Address of TCB 


Register 7 
TJBX | 


Register 3 


Address of CVT 


Register 4 


Address of TJB 


TCB 





Decrease the count of users. 


Sessa 
| 
| 
| 


TCBTSTSK 














ra eo lf the task is not logon 
TCBBACK —+ | 
= TSCVT 
r | TJBLOGON | | TSCLOGON 
TIBXFST i> if the task must have a new region, ee 
ns aa | { indicate logon; =i, > —“14 TJBDISC 
TJBXLST = | otherwise, indicate disconnect. 
| rm If TSO is not active or if TJID=O ai 10 
| 
ies ye 1 | Log off. TSIP 
TJBNEWID ——- | fos 
| ca | 


A“ oe ae 


ee eee 


ae. An 
Ae se ee 


IKJEAQI 


Post the ECB of TSC, POST 


IEAOPTOT 
3.8 
(Continued at Step 9) 
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Diagram 8.5 (Steps 1-8) Degueue TCB Sukroutine (Module IFAVETOO) 

oe ee ea Sa aa Sa a aS T+ - =p = === 1 
| |ROUTINE | | 
| NCTES | NAME | LABEL { 
| ---------------------------~-------------------------------- $--------+-------- 
| 1 TCBTSTSK, when set, means that this is a TSO TCR. | IEADQTCB|TSOECT | 
| | | | 
| 4 TIBXFST contains the address of the logon TCE. This | | | 
| field is conpared with TJBXLST (the last TSO TCB); if | | | 
| the two are equal, only the logon TCB remains -- this | | | 
| is the logon task. | | | 
| | | | 
| TJBXLST needs to Le updated only if it points to the | | | 
| terminating task"s TCB. | | | 
| | | | 
| 5 TJIBNZWID, when set, means "assign a new regicn tc this | | LOGONXIT | 
| task." | | | 
| | | [ 
| 6 | | CNTRELOG | 
| | | | 
| 7 For further information about the TSIP routine, see | | | 
| OS/VS2_ TSO Control Program Logic. | | | 
| | | | 
| 8 The address of the POST routine is obtained from the CVT| | | 
| (CVIOPTO1). | | | 
a we ae aac ae ee r| 


9€S 


Input 


TCBFTS 
TCBDSP 


CVTTSCE 


TSDPRTY. 


TSFIRST 
TSLAST 
Register 4 


Address of TCB 





Processing 






Q Zero the subtask pointer of the 
Region Control Task. 


of a time-slice group 


11 Search the TSCE chain for a 
dispatching priority match with the 
TCB. 


12 Compare TSFIRST, TSLAST, and 
TSNEXT with the TCB address: 


e@ If none matches 


e If all match, set TSCE to show 
"group is without members", and 
reset the time-slice flag in the 
TCB, 


e@ If only TSFIRST matches 


e If only TSLAST matches 


13 Update the task queve. 














10 If the specified task is not a member 


Diagram 8.5 (Steps 9-13) 
Dequeue TCB Subroutine 


Output 







SREP 


PN NAAN AN AAA 


mp> 13 









=> 13 
TSCE TCB 


a 














PANNA AN AA 









TSFIRST 


Next lower 
priority TCB 


id 


Next higher 
priority TCB 


Next higher and lower 
priority TCBs 


PSE a 


TCBBACK 


LRBBRARABas 


TSLAST 








BABA, BAB 






Caller 
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Diagram 8.5 (Steps 9-13) Dequeue 1CB Sukroutine (Module LEAVFTOO) 


eS ae ee a eS a ae ea Se area TS SS5 55> Saar 1 

| ROUTINE | H 
| NOTES | NAME | LABEL | 
emma ae em em a a a a t-------- $-----=-- 4 
| 9 | IEADQTCR | RESTORE | 
| | | 
110 TCEFTS, when set, weans that this task is time-sliced. : |TMSLTSK | 
| | | 
11 1 | | FINCDTSCE | 
| | | | 
{12 TSFIRST and TSLAST point to the first and last TCBsS of | |CHKFST | 
| a time-slice group. | | | 
| | | | 
| TCBTCB is the address of the next lower-rpriority TCE. | | 
| | | i 
| TCBBACK is the address of the next higher-priority TCB. | | | 
{ | | | 
\13 The TCBTCB field of the next higher-priority TCB is set | | ENDTMSL ! 
| to the TCBTCE field cf the terminating TCB. The TCBBACK | | | 
| field of the next lower-priority TCB is set to the | | | 
| TCBBACK field of the terminating TCB. If the terminat- | | | 
| ing task is the lowest APG (automatic priority group) | | | 
| task, IEATCBP+4 is set equal to TCBBACK and the high- | q | 
| orijer byte of IEATCBP+4 is set to X‘'80'. | | | 
Ue Se kr Se ee ee i le iss Pe nS Be a ee J 


8ES 


Diagram 8.6 
Purge TAXEs Subroutine 
From EOT Purge Timer subroutine (8.7) . 
to eae and free TAXEs Processing Output 
IEAKJXP 


Input 1 Get TJB and TJBX addresses. GETTJB Register 2 
ti (Subroutine of Exit) Sinaia Address of TJB 


Register 4 


Register 7 
Address of TCB Address of TJBX 
TJBX TJBX 


2. if this is a user exit and if the IQE 
is for the current TCB, zero the IQE 
TJBXAIQE=0 pointer. ARRBRESEEEEERRERRRRERREE 






S> TIBXAIQE=0 


e 
xP. “=r 





IQETCB=TCB address 





3 > Ensure no attention exits. BBW Wad@eeae_ ea aaa esaaaaaaa » TJIBATTN=O 


Call 
TJBXTAXE=0 @ if there are no TAXEs er 


5 For every TAXE on the queve associated 
with the terminating task: 


TAXE 


TAXEFREQ=1 


TJB 


TJBSTAX-] 







A. Mark unavailable and decrease 


the count of unscheduled TAXEs. BRR OO SO Seek esaaaaaaea 





‘N 


Pond i 





TAXE IRB 


RBFDYN=1 


B. Indicate that TAXEs should be freed 
by Exit. RRRRRREEEEEEEEEEEEEERE' 





C. Free problem program save areas 


and dequeve TAXEs, FREEMAIN 


RMBRANCH 


(ABBRANCH if entry 


is from ABEND) TJBX 
6.1 





g 
Annawan: WEBRBRRERRRERRRRARH 


tart any stopped tasks. 
6 Ss y stopped task STATUS 
= 1GC07902 
3.18 


[eee sal TAXE 


TAXELNK 





ret dew 


Caller 
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Diagram 8.6 Purge TAXES Subroutine (Module IEAVETO0) 


Sc a a a a rn aaa 9 SES agua ar alae 
| |ROUTINE | 

| NOTES | NAME | LABEL 
}----------~-------------------~------------------------------ $-------- +-------- 
| 1 | IEAKIXP | TAXEPRG 
[ | | 

| 2 TJBXAIGE points to the IQE. It contains a 0 if this is | | 

| a user exit. | | 

{ | | 

| TJBATTN contains the TJB attention count. | | NOSCHED 
I | | 

{| 5 A. The TAXETCB in each associated TAXE contains the | | TAXEFND 
| address of the current TCB. | | 

| | | 

| B. | | SKPDECR 
| | | 

| Cc. { | NOACTV 

| | | 

| 6 There are nc suktasks to start if EOT has called this | | 

| routine. If ABEND is the caller, however, there may Le | | 

| subtasks that still must ke dispatched. | | 

Die ee ae 6 Oe eee ea eae eee 


Ons 


From EOT (8.3) or ABEND (8.20) to . 
dequeve and free unexpired TQEs Processing 


IEAQPGTM 
Input 


1 Purge TAXEs for TSO tasks. 


Register 3 Register 4 


Address of CVT 


Address of TCB 


TCB 


m———t 2 If there is no TQE 


cancel the timer request. 





TQE 


TQEFLGS ----- 
4 Free the program save area and 
TQE storage. 





TCBTME=0 —- r~—T S$ If the TQE is queved, dequeue it to 
| 
| 
| 


5 Indicate that TQEs have been purged. 


Diagram 8.7 
Purge Timer Subroutine 


Purge TAXE 


IEAKJXP 






8.6 


Caller 


Output 


Register | 
LALA EERERERERERERERERERERRERE EER EE 


mem Govcel Viner 
IEAQT DOO 
77 TQE 
ean aa TQESADDR=O 


=e 


RMBRANCH 
(ABBRANCH if entry 
is from ABEND) 










TCB 


CT CBTME=O 


Caller 
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Diagram 8.7 Purge Timer Subroutine (Module IEAVETOO) 


C 


Ce ee a ee a ee eR ae ea ee eT ee | ee a aera 1 
| | RCUTINE | | 
| NOTES [NAME | LABEL | 
| --------~-------~----~--~---------- ~~ === == - === +--+ f----- =f ----=--- | 
1 1 | LEACPGTM|ETMBSE | 
| | | | 
| 2 TCBTME=0 means that there is nc TQE. | | SKPTAXPG | 
| | | | 
| 3 If bit 0 of TQEFIGS is set, the TOE is not cn tne timer | | | 
_ pot 
| The address of IEAQTLOO is oktained from the CVT | | | 
| (CVTOTDOO). | | | 
| | | | 
| 4 TQESADDR is zeroed to indicate that the save aréa is | | ETMFREE | 
| freed. The program save area is in subpool 250. TCEFs_ | | | 
| are in subpool 253. | | | 
| | | | 
15 | |ETOEFR | 
Da a a el i Genet erent Pe ee 4 
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Diagram 8.8 
Release Loaded Programs Subroutine 
From EOT (8.3) or ABEND (8.21) to release . 
loaded modules that have not been released Processing 


with a DELETE macro instruction 








Output 


[EAQABL 




















Input 1 If there are no LLEs Caller 
| 
Register 3 | Update the use/responsibility count, MAWRBBRBBBRRRAEREREEREE % 
Return address | ree 
| Free the module. CDHKEEP CDROLL 
Register 4 l ime 
dusresich | 
TCB | 
_) 





TCBLLS Free the LLE. 


FREEMAIN 


RMBRAN CH 
(ABBRANCH if entry 
is from ABEND) 


6.1 


LLECOUNT 


LLCDPTR 






Repeat Steps 2, 3, and 4 until all 
LLEs and modules that can be freed 
are freed. 


Caller 


CDUSE 
CDROLL 
CDATTR2 
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lagram 8.8 Release Loaded Prcgrams Subroutine (Module IFAVFTOO) 


Cg eg pg a fe gd eg ee a ee ep ee Ee Spe cay as as ee ee Vo ee oe 
| ROUTINE 


NAVE 


—— a pe ee a ee ce ae a a ae ee we a ee re ee ee a i i ae we a we ee ee 


1 If TCBLLS=0, there are no LLEs. 
2 LLECOUNT=numker of load requests for a module. 


CDUSE and CLCROLL, viewed as a single field, contain the 
total number of requests for a ncdule. 


NIP sets the use count of any fixed link pack area 
rodule tc 1 so that when EOT decreases the use count, 
it never reaches 0. 
Fach LLE points to an associated CLE. 

3 CDHKEEP is a Subroutine of the Exit routine. 
Note: Modules on the jok pack area queue are released 


ty the Release Storage subroutine, Diagram 8.9. 


> 


ee eee | 


-—— — — 


nhs 


Input 


Register 3 


TCBJPQ 


TCBFSA 


TCBMSS 





From EOT (8.3) or ABEND (8.21) to 
release storage obtained during 
program execution 


Processing 






IEAQSPET 
Register 4 
Address of TCB eS 1 Free remaining modules, CDEs, and 
extent lists in the job pack area, 
| 
| 
- 2 Free these subpools and work areas: 
Job Pack Area Queve 
P77 A. Problem program save areas 
(unless an ECB or ETXR is 
requested). 


SPQEs. 


——_— — — = C. LSQA and SQA. 





ee B. Owned, unshared subpools and 








Diagram 8.9 
Release Storage Subroutine 


DESTX 


(Subroutine of Exit) 


Output 


RMBRANCH 
(ABBRANCH if entry 


is from ABEND) 
6.1 





TCBFSA=0 
FREEMAIN 


RMBRANCH 
(ABBRANCH if entry 


is from ABEND) 
6.1 





FREEMAIN 


IEAPLSQA 
6.11 


Caller 


“ 
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Diagram 8.9 Release Storage Subroutine (Module IEAVETOO) 


et tee ee EN a te eee Ott Ee ea Ne NT AMG POETS Wie Opes e OR ee Reg ere Waeas  oe SO en et 7 
| RCUTINE | 


NOTES | NAME | LABEL 
] The job pack area queue must contain at least one CDE. | LEAQSPET| ETMSLP 
If it does not, Step 1 is bypassed. | 
[ 
2 A. TCRFSA=0 means that there is no problem program | ETFRST 
save area. If an ECB or ETXR was specified, the | 
Save area iS not freed. It must be retained for | 
examination by the attaching task and is freed | 
later ty the DETACH routine. | 
| 
BR. Only Sukpool storage that is owned by the termina- | ETFSPQE 
ting task is freed. SPQEFs are dequeued Lefore the | 
storage occupied Ly the SPQE is freed. | 
| 
C. Sukpool 253 contains the TIRB, the parameter list | ETFAQE 
for CLOSE, and any TAXEs and TQEs of the terminating| 
task. | 
| 
| 
| 
| 
| 
| 
4 


If TCBAQE=0, there are no AQES (allocated queue 
elements); this step is bypassed. 


Subpools 254 and 244 are automatically freed ky FREE- 
MAIN if the terminating task is the job-step task. 


ee nn nnn nn nan nn OE 


-——— — — — 


9S 









Program First-Level Interruption 
Handler 


Diagram 8.10 
Overview of the ABTERM Routines 


{EAQABOO 












ABTERM (schedules ABEND) 
8.12 





IEAOPLOO/IEAOABO1 
ABTERM Prologue 





Refresh the CVT address, 






e Exit to error handler for paging 
errors. 















e Exit to error handlers for I/O, 
1/0 supervisor, and paging 
errors, 







Save the completion code. 


e@ Indicate that GETMAIN 
requests beyond the bounds of 
the LSQA be satisfied by the 
SQA, 


e@ Set the ABEND completion code 


(for type-1 SVCs). Caller, Type-1 Exit Routine, 


or Dispatcher 



















e Save the program old PSW and 
general registers to be dumped. 








e Build a TIRB to cause remaining 
execution to occur using the TCB 
specified for termination, 






e@ Request a dump. 
Prevent asynchronous exits. 


Ensure a task switch. 


8hS 


Input 


CVTSEIC 


CVTSLID 


CVT 


CVTPGSUP 





Program 
Interruption 
Save Area 


- 
° , 
y rs 


IEAPKSAV 
es. 


< 
2 
a] 
“ 

A 


# 


CVTSEIC 


— 
om, 


CVTSERA 


“s . « 
oe 





SVC FLIH Dato Area 


a 


IEATY PET 





: P “ay RG: 


From Program FLIH (2.5) to 
perform housekeeping before 
entry to ABTER 


Current TCB 


IEATCB+4 


10S Data Area | 


IECPESW 


Real Storage 


FLCSVCN 
FLCSCSAV | 


SVC FLIH Data Area l 


IEATY PE] 





ee 
Real Storage TCB 


| 
| 
| 
| 
| 
I 
40| Program old | | 
RB {>> l 
44 PSW | 
| 
| 
| 
| 


sy ee 


From resident system 
routines to provide 
proper interface 
with ABTERM 


| 
| 
| 
| 
| 
a 


es ee ee 


Register | Register 4 


| | Error code | [Address of TCB 


8 Set up parameter registers for ABTERM 


Diagram 8.11 
ABTERM Prologue 







Processing Output 
IEAOPLOO 
4 Refresh the CVT address Real Storage Register 3 
; v Address of CVT Address of CVT 
Register 4 
2 Obtain the TCB address. SS Address of TCB 
3 For program interruptions during |/O ee Supervisor 
processing and for interruptions to ee aORE 
SVCs 0, 15, 92, and 114 DLErUprron 
Handler : 
(IECCPLOO) Register | 
4 For paging errors Page Hook (5.57) 
Register 1 
5 sif the interruption occurred in a eo 
type-I SVC or with SVC FLIH rr Completion code = X'0F2' 
6 Save registers and the program old 
PSW, ILC, and interruption code (if 
the interruption did not occur in the RB (current) TCB 
Wait task). RB PS 
RBINLNTH TCBGRS 
| RBINTCOD | 
7 Set the proper return address and Register 14 Register | 
ABEND error code. SS Return address | | | Error code 
{EAOABOI 


Register 1 Register 0 


Dump | (Error Address of TCB 
option code) 





and request a dump. 


ABTERM 
(IEAOABOO) (8.12) 


2g uOoT DAS 


L 


ututs 


r3e 


uoT 
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iagram 8.11 ABTERM Prologue (Module IEAVABOO0) 
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The CVT address at location 16 is refreshed Lecause 
lower real storage is especially vulnerakle to keing 
overlaid. 


2 cvVTSEIC is the second exit indicator. If set, the TCB 
address is obtained from CVTSLID. Otherwise, the 
current TCB address (IFATCBPt#4) is obtained. 


3  IECPESW, when set, means that an interruption occurred 
during I/O processing. 


IEATYPE1 is checked to determine whether the inter- 
ruption occurred in a type-1 SVC. 


FLCSVCN contains the SVC numker. 
FLCSCSAV is the register save area. 


For further information about the IOS Program 
Interruption Handler, see OS/VS I/O Superviscr Icgic. 


Registers from the program check save area are woved 
into the TCB. 


If the interruption did not occur in the Wait task, the 
program check old PSW, the ILC (interruption length 
code), and the interruption code are saved in the cur- 
rent RB. This information appears later in the ABEND 
dump . 


If the interruption occurred in the Wait task, the old 
PSW cannot ke saved kecause it would overlay the Wait 
PSW. The ILC and interrupticn code, if saved, wculd 
overlay the floating-point register save area. 


7 «If CVTSEIC is set, the return address is set equal to 
CVTSERA. If the type-1 switch (IEATYPEF1) is set, the 
return address is set equal to the Type-1i Exit routine. 
Otherwise, the return address is set with the address of 
the dispatcher. 


-——— + 


-------- T------ 7 
ROUTINE | | 
NAME [LABEL | 
a a oe ee +-------—-— 
IEAOPLOO | PROLOGUE | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| IOSEXIT | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
|PAGEXIT | 
| | 
| PCTYFE1 | 
| l 
|ABSTAT1 | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
i | 
| | 
| | 
| | 
[ | 
| | 
| | 
| | 
| | 
| | 
uae  aeearenRe 
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Diagram 8.12 (Steps 1-8A) 
Mainline ABTERM Processing 
From user and system interruption handlers 


and SVC routines to schedule a specified 
task for ABEND 


Input Processing Output 





HEAOABOO 
Register 0 Register 1 
Register 3 


: Real Storage 
TCB address of task Dump Completion _—— x'16! 
code 1 Refresh the CVT address. Address of CVT Address of CVT 


2 If the specified task is the paging 
supervisor, substitute the task that 


CVTPGSUP pears pain: i. ae ae 





PAGEHOOK Address of the TCB 


a of the task to be 


5.57 terminated 





3 ifthe specified task is not on the task 


queve RETCALL 
4 ifthe specified task has already been 
terminated Caller 
5 For TSO tasks in a terminal wait state STATUS 


1IGC07902 
Reset TSO 


nondispatchability . 
3.18 





6 If STA is in progress 


7 ‘lf the specified task has been scheduled 
for termination RETCALL 


Caller 


| 
tu 


8 If the specified task is the job-step task 


and the initiator called ABTERM: STATUS 


A. If the task is not already in the IGCO07902 
process of abnormal termination Reset selected primary 
nondispatchability 


flags. 


} 3.18 
OB 


(Continued at Step 8B) 
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TSS 


Machine Check Handler; user type-1 SVCs; user and system| 


type-2, 3, and 4 SVCS; system routines. 


The internal subroutine, RETCALL, returns to the caller 
if the return code address points neither to the Tyre-1 
Exit routine or the dispatcher. If the return address 
points to either the Type-1 Exit routine or the dis- 
patcher, RETCALL checks the type-1 switch (IEAPTYPE1) 
in the SVC FLIH. If the switch is set, RETCAIIL fasses 
control to the Type-i Exit routine. If it is not set, 
RETCALL passes control to the dispatcher. 


CVTPGSUP contains the address of the paging supervisor. 


This address is compared with the specified TCB address. 


The operator's CANCEL command cculd request ABTERM 
processing for a task that has completed normal EOT 


processing. TCBFC, when set, means the task is ccmplete. 


TCBIWAIT, when set, means the task is nondisratchakle 
due to an input wait condition. TCBOWAIT, when set, 
means the task is nondispatchable due to an cutgut wait 
condition. 


TCBSTABE is the STA recursion flag. If it is set, 
TCBABTRM is not tested -- this task must be scheduled 
for ABEND. 


TCBABTRM is the ABTERM recursion flag set in Ster 9. 


TCBOTC contains the address of the originating TCB. It 
matches the address contained in IFATCBPt4 (current 
TCB) if the initiator is the caller. TCBJSTCB contains 
the address of the job-ster TCB. 


After resetting the selected primary nondispatchability 
flags, the stop count is zeroed. STATUS is then called 


again to reset the selected secondary nondisratcharility 


flags. 


A. TCBFA, when set, means this task is keing abnor- 
mally terminated. 
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Diagram 8.12 (Steps 1-8A) Mainline ABTERM Processing (Mcdule IEAVABOO) 
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Diagram 8.12 (Steps 8B-9D) 
Mainline ABTERM Processing 


Input Processing Output 


(Continued) TCB 


Register 1 


Dump B. If the task is already in the process : &: a A 
option of abnormal termination: 2 | TCBFT=0 
e Ifa dump was specified RETCALL ees prs be cis iz ot & 
Br rms 


TCBFA=0 
[.! ce? _ 
TCBFOINP=0 
If no dump was specified =—> — 
TCBFOINP alae ia AN Be as: Pee 
Le 5: US lm 
TCBISTCE PERE es 
If the specified task is not the job-step TCBCREQ=1 
: st k: au TT 
TCBABWE . 2 ee ee 
A. If the task is set "nondispatchable 


TCBSTCC _ because in ABEND wait" RETCALL 


) , ) : aa a ios 
TCBFA - — 


B. If the dump option and completion oR tS 


code are already set... TCBRCMP=completion 
code 


“ae = 
t eee ee 


TCB 
SOR bE a ae 
Otherwise >} TC BCMP=dump option and 
r, completion code 
4XARRABRRBWRBRERRERERERBRRRERREREREE TCBSTCC=1 
——-~ 
eS Ses 
C. Indicate that GETMAIN requests TCB 
that cannot be satisfied by the Ty eS 
LSQA should be satisfied by the ee tse 
SQA. ER Of 
Sgt ies SRE, ES 
. Build and initialize a TIRB to cause Re See ue 


remaining execution to be done 
under the TCB specified for 


termination | Stage 1 Exit Effector 


(Continued at Step 9E) 
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Diagram 8.12 (Steps 8B-9D) Mainline ABTERM Processing (Module IEAVABO0) 
Gr re eS ee eee Te S ae a eae 1 


ee ee ae eS ee 


ve) 


The task may already be in aknormal termination 

if the operator issued a CANCEL command cr the jok- 
step timer expired. If no dump was specified (for 
example, a CANCEL command without the dump oftion 
was issued), all flags that indicate ABEND proces- 
Sing are cleared to give the appearance cf a first- 
time request for termination. The stacking flag in 
the job-step TCB is reset if TCBFOINP is set. 


TCBJSTCB contains the address of the job-ster TCE. 


A. 


TCBABWF is set by ABEND, and means the task is in 


a wait state. ABEND should not be scheduled because 
a related higher-level task is already being akncrm- 


ally terminated. Resources for this task are 
released as part of the termination processing for 
the higher-level task. 


TCBSTCC=0 means the completion code and dump flag 
have not yet been saved. The completion ccde is 
displayed in the dump as a part of the TCB; it is 
made available to the attaching task via the ABEND 
routine, and it is displayed in a GTF trace, if GTF 
is active. 
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ROUTINE 
NAME 


| | 
[LABEL | 
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Diagram 8.12 (Steps 9E-9L) 
Mainline ABTERM Processing 


Processing Output 
Q (Continued) 
E. Get storage for an SQE. | = GETMAIN. 
Se SQE 
Si ete TIRE 
F. Initialize SQE pointers. pe 
ee | 


Ta CVT 
ey aid 
a as 
pe. eae 


G. Indicate that the TIRB should 
be freed when the Exit routine 











is given control. MBAR BeSackSs Baaaaaaaaaaaaaa;l » 
TCB 
H. Set “ABTERM scheduled" and 
Input “prevent asynchronous exits" 
flags, LABRABRA BARRE BABE ERG gQdaa’ 


: ee 
CVTSLID _— I. |f the specified task owns the 


supervisor lock, increase the lock CVT 
count and indicate that ABEND 
was scheduled while the supervisor 









lock was set for this task. BIRR BRRA BASSES EE EaREEgaaaad CVTSPVLK+1 
= ee 
J. Schedule the SQE, pen Sse 2 eee 2 | Stage 2 Exit Effector | Effector ie a= 
TCB 
|EAOEFOO , 
TCBSPVLK=1 
K. Ensure a task switch. | Task | Task Switch [Pika setae eke 
Goer TCB Pointers 
IEATCBP 
L. Return to the caller, RETCALL Sees 
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Diagram 


8.12 (Steps 9E-9L) Mainline APTERM Processing 


Cc 


(Module IFAOABOO) 


De er nae ae a Pe Rar dye a ee Meet Gg ee be gle! a ye ra a Nat ice eel ae ey ee ee ae 2 | a ers 1 
JROUTINE | 


TCEABTRM is checked Ly this routine on recursion. 
(See Step 7.) TCBFX is set to prevent the schedul- 
ing of a user's exit routine for the task by the 
Stage 3 Exit Effector during dispatcher frocessings. 


The task for which a lock is set was prokakly 
Manipulating critical system queues. ABEND writes a 
message to the operator to warn that system froklems 
May folicw. 


The Task Switch routine determines whether a higher- 
priority ready task shculd be given control when the 
dispatcher is next entered. The Dispatcher routes 
control to the SVC 13 instruction fointed to in the 
SCF built in Step 9F. 


NAME 


| 
LABEL | 


9&SS 


Diagram 8.13 
Overview of the ABEND Routine 


SVC 13 Instruction 


ABRECUR 


SVC Second-Level Interruption Recursion Phase 


Handler 

















Route control for invalid recursions. 
Purge outstanding paging activity. 
Purge outstanding I/O. 

Purge partially loaded programs. 


IGC1001C Permit asynchronous exits 
TA ; 
IGC0001C STAE : BYSTAE - Return contro! to the point subsequent to the action 
Initialization Phase Interface with ASIR Initial Housekeeping Phase causing the recursion. 


8.14 8.15 


Route control for recursions. 
Invoke GTF to perform recovery. 
Issue a WTO message if the task failed 





Prohibit asynchronous exits. 

e Satisfy GETMAIN requests from the 
SQA if the LSQA is full. 

e@ Set tasks dispatchable if necessary. 

e Activate the supervisor trace if 
required. 

e@ Process the ABTERM TIRB if needed. 

e@ Turn off the ABDUMP 

nondispatchability flags if necessary. 











Suppress SQEs and IQEs; deactivate the TIRB. 

Route control for recursions. 

Free the PIE. 

Establish the top task in the chain of terminating tasks. 
Route control for tasks failing in must~complete status. 
Route control for critical system tasks. 

Set tasks nondispatchable. 

Provide support for multiple job-step failures. 

Delete message table entries. 

Purge outstanding WTOR requests. 

Purge paging activity. 

Purge outstanding I/O. 

Route control when the top task has a subtask that is 
nondispatchable. 

Route control when the top task does not have a subtask, 
or the subtask is dispatchable. 


while owning the supervisor lock. 

Pass control to the ABEND/STA 
Interface routine (Diagram 8.44) if the 
exit routine should be scheduled. 









Must-—Complete Phase 


Purge outstanding paging activity . 

Purge outstanding I/O. 

Purge outstanding WTOR requests. 

Attempt to provide a dump (SVCDUMP routine, 

Diagram 8.26). 

Issue a WTO for the task that failed. 

@ Route control for critical resources. 

e@ Schedule tasks queued on must~complete resources for 
ABEND (ABTERM routine, Diagram 8.11). 

@ Route control if the current task stil] operates in must- 
complete status. 

e@ Reenter ABEND at: 

IGC1001C - noncritical task. 

IGCOOOI1C - critical task, 

























MAINLINE IGCO101C DMPHASE 


Mainline ABEND Open Phase ABDUMP Phase 
8.17 8.18 


@ Issue a WTP message for each message table entry. Route control if no dump should be provided. 
IGC2001C Suspend GTF if necessary. 

e@ Stack current ABEND requests if necessary. Allocate (ENQ) the dump data set. 

e@ Purge partially loaded programs, Dump the resources of the current task, its 

e@ Permit asynchronous exits. descendants, and its antecedents (ABDUMP routine, 
e Route control for dump processing. Diagram 8.27). 

@ Route control if no dump is requested. e@ Deallocate (DEQ) the dump data set. 

Restart stacked tasks. 


e 
IGCIIOIC 


e@ Recursion entry point -- return to ABEND, 






























@ Maintain a record of 
programs loaded and 
pages fixed. 

e@ Open the dump data set. 

@ Restart stacked tasks. 

















IGCO201C 


Critical Error Phase 





Close Phase 
IGC1301C 


Purge message table entries. 

Purge paging activity. 

Purge outstanding I/O. 

Purge asynchronous exits. 

Purge outstanding WTOR requests. 

Purge queued resources. 

Restart GTF if required, 

Set tasks nondispatchable. 

Issue WTO concerning the halting of task processing. 

e Exit to the Dispatcher (Diagram 3.17). 

1GC2301C 

e Attempt to provide a dump (SVCDUMP routine, 
Diagram 8.26). 

e Schedule the job step for ABEND (ABTERM routine, 
Diagram 8.11). 

e Exit to the Dispatcher (Diagram 3.17). 

IGC3301C 

e@ Recursion entry point -- return to ABEND. 


HOUSKEEP 


e Erase completed tasks. 
@ Restart GTF if necessary. 
ENTRY2 
e@ Purge unexpired TQEs and TAXEs. 
e@ Permit asynchronous exits. 
e@ Purge the PIE. 
e Close data sets, 
IGC0401C 
@ Close data sets. 
e Purge the DEB. 
IG C2201C 
@ Restart stacked tasks. 
Purge queued resources. 
Purge IQEs and SQEs. 
Cancel outstanding TCAM and TSO interpartition 
POST requests. 
IGC1401C 
e Recursion entry point -- return to ABEND. 


Final Housekeeping Phase 


Purge fixed pages. 
Purge RBs and associated resources. 
Purge the load list. 


Free storage. 
Remove the TCB from the task priority queue. 
e@ Exit to the End-of-Task routine (Diagram 8.3) 


IGC1201C 
e Recursion entry point - return to ABEND, 





8SS 


set flags for further processing 


Current TCB 


TCBEXS VC 


TCBNDSVC 


CVTGTRCE 


Current TCB 
TCBABT RM 


q — — — 





From the SVC SLIH (2.3) to 


Processing 


1GC0001C 


1° Prevent the scheduling of asynchronous 


exits for the current (failing) task. 


Permint GETMAIN requests for the 
LSQA to be satisfied using the SQA. 


If the task did not fail during SVCDUMP 


processing 


Turn off the SVCDUMP-in-progress 
flag; set tasks dispatchable if set 
nondispatchable by SVCDUMP. 


Activate the supervisor trace if required. LRRRRRBRRREREEE EERE EE EE OOO OBE GOO 


Determine whether ABEND was 
invoked directly (via SVC 13), or 
indirectly (via ABTERM). Reset the 
ABTERM flag. 


Save the completion code; copy the 
dummy TIRB register save area, 


If there is a real TIRB on the RB queve 


Place the dummy TIRB on the top of 
the RB queue; set PSW for reentry 
into ABEND. 


Diagram 8.14 (Steps 1-9) 
ABEND Initialization Phase 


Output 


Current TCB 
MWARRREAESEEEEEEEGGAEaGGEaaaaaaaa TCBFX=1 


Current TCB 


BWABRRAREERESEEEEERRE EEE GGG EEE TCBABGM=1 







TCB 
STAT 
Pl TA VN N TCBNDSVC=0 
IGC07902 


V 3.18 CVT 
PAAWVRBEBRBRBRBE NNN NANANAN AAA NN CVT DMPLK=0 








CVT 


CVTSDTRC=0 
| CVITRACE RACE 










TRACMASK=1 


Direct 


Current TCB 


TC BABTRM=0 


SVRB 
ea ee ee GPRS 


: 11 
g 


ARAUABRBBRRBERESESEEEEEEEEEE EEE 


> 10 

SVC 3 Exit 
Routine 
(3.14) 


(Continued at Step 10) 
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Asynchronous exits are prohikited to avoid interrupt-— | 
ions. The recursion code is saved and the TCBABCUR | 


 - 


Diagram 8.14 (Steps 1-9) ABEND Initialization Phase (Module IEAVTMOO) 


pao ep a et pag CONNER ef tg ge GR ewe eg Oe pe ee ga OVO EE Gea pC ap ae Ay ete ge oe ye ecg Oe Monet. 8 wt pe 
| ROUTINE 


ization 


field is zeroed out. |Phase 


| 
Because GETMAIN requests can be satisfied using the SQA | 


(system queue area), recursions due to insufficient LISCA| 
(local system queue area) storage are prevented. 


If tasks sharing the same LSOA as the task being dumped 
are nondispatchable due to SVCCUMP processing (TCBNDSVC 
#0), they are set dispatchakle at this time. All tasks 
represented on the task queue are frocessed. 


The SVCDUMP flag (CVTSDTRC) is turned off to indicate 
that the failure occurred during SVCDUFP processing. If 
the supervisor trace is requested to be started 
(CVTGTRCE = 0), the TRACMASK field is turned on. 


The completion code saved Ly ABTERM is stored in the 
ABEND SVRB FSA. The dummy TIRE (task interrurticn 
request block) register save area is copied into the 
ABEND SVRB register Save area. 


The PSW is set to the address cf SETADMP (Step 12); 
control returns to this point after the Exit routine 
has completed processing. AFEND registers are saved in 
the TIRB register save area Eefore exiting. 


-—— — 


SVCCLOOP 


SVCDNXT 


NOSVCDMP 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
ABTRM | 
| 
| 
| 


TIRBLOOP | 


| 
NORLTIRB | 


-——— — 
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Diagram 8.14 (Steps 10-13) 
ABEND Initialization Phase 


Processing 


10 


Input 


Current TCB 


TCBSTCC 11 
TCBFA 


Current TCB ¢q--—-- 


TCBADMP L—— 12 


Current TCB ¢+-——- 


TCBJSTCB L a a 13 


Copy the real TIRB into the dummy 
TIRB; set the real TIRB inactive. 


Stage 2 Exit Effector 


P| |e A0tF 00 
Queue all SQEs except 


the top SQE, to AEQS. 
3.12 





42 Output 















Current TCB ABEND SVRB 


TCBSTCC=1 RECCOMPC 
TCBCMP 


BABAR AERRRREREEEEEREER 


Save the completion code. 


If tasks in the job step have not been 


set nondispatchable by ABDUMP REE eee 


with ASIR (8.15) 





Job-step TCB 


TCBADMP=0 
TCBN DUMP=0 


Current TCB 


TCBADMP=0 









Turn ott ADBUMP nondispatchability 
flags . >WRWABERAREREBERAREREREEREE EEE 


STATUS NEN 
ae 1GC07902 


ABEND Interface 
with ASIR (8.15) 


3.18 
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Diagram 8.14 (Steps 10-13) ABEND Initialization Phase (Module 
Gy ee er gh es aN ee eT ee ey eer T 


| | 

| NOTES | 

10 After removing the dummy TIRB from the RB queue, the | 
real TIRB is copied into the dummy TIRB. The ABTERM | 
TIRB is then queued onto the RB queue at the location l 
occupied by the real TIRB, which is set inactive. The _ | 
Stage 2 Exit Effector then queues SQEs (supervisor queue | 
elements) to the AEQS (SQE asynchronous exit queue) 
queue. 


| 
| 
| 
| 
| 
| | 
| 
111 If this entry to ABEND is a recursion (TCBFA = 1), the | 
| completion code is saved in the ABEND SVRB. Otherwise, | 
| if the completion code is to he saved (TCBSTCC = 0), it | 
| is stored in the TCB. The TCBSTCC flag is set to | 
| indicate that the completion code in the TCB is not to | 
| be overlaid. The completion code is provided in | 
| diagnostic messages should a recursion occur. | 
| | 
| | 
| | 
| | 
| 

| 

| 

| 

| 


12 If the failure occurred in ABDUMP processing and tasks 
in the job step have not been set nondisrfatchakle 
(TCBADMP = 0), execution continues with the ABEND Inter- 
face with ASIR (Diagram 8.15). | 


| 
13 The nondispatchability flag TCBADMP is turned off in the| 
current and job-step TCBs to avoid further entries to | 
STATUS in the event of recursion. | 
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Phase | 
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From the ABEND Initialization Phase (8.14) 
to determine whether the exit routine is to 


receive control 


Processing 









Current TCB Seer ot oe 
TCBCMP fe 1 
Current TCB q+ — ---4 
TCBSTCUR en eed 
Current TCB g- = — —————-—-} 3 
TCBFA 
Current TCB @4—-—- + — -— -— --— — - 4 
TCBTID 
5 
Current TCB ¢—+-------- 6 
TCBSTABB 
Current TCB <q -+-- ee 7 
TCBFSTI 
Current TCB G— —=- -_--—- 4 
TCBOLTEP | 8 
Current TCB q— -—--4 
TCBFSTI PS 9 





TCBCMPC 
TCBNTJS 










Current TCB ¢q+-_-- 
TCBSTABE 





*Note: The ABEND routine has been divided 


STAE* into phases according to function. This entry 


point is not a true entry point; it is the first 
label in this phase, 


Set the TCB33E flag if the completion MADRE RERRRERE' WRRBBABAe 


code is 33E. 


> 11 


If a STA recursion is valid 


If this entry to ABEND is a recursion 


If the failing task is a critical system 


task > 11 


Invoke GTF to perform recovery 
procedures. 


If a STAE or STAI environment does 
not exist, or if this is a jobstep 
ABEND resulting from invalid 
recursion during subtask ABEND. 


If the task failure was not due to an 
operator CANCEL command or a timer 


expiration ea 9 


Yes 


—" 
No 


Determine whether the failing task is 
the OLTEP task. 


If the scheduling of the user's exit 
routine should be suppressed 


If a STAE recursion condition exists === 13 


(Continued at Step 11) 


¢ Diagram 8.15 (Steps 1-10) 
ABEND Interface with ASIR 


Output 





Current TCB 


aeenneapenp! 16007] 
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ABEND Initial 
Housekeeping (8.16) 


i 


EID = IEAABND 


ABEND Initial 
Housekeeping (8.16) 


ABEND Initial 
Housekeeping (8.16) 


ABEND Initial 
Housekeeping (8.16) 
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Diagram 8.15 (Steps 1-10) ABEND Interface with ASIR (Module IEAVTMO0) 
pee a ee ee ee eae 


1 A completion code of 33E indicates that a DETACH macro 


instruction, specifying the STAE=YES operand, has been 
issued Ly the originating task. However, the specified 
subtask has not completed execution. The TCB33E flag 
is used by ASIR (ABEND/STA Interface Routine). 


The three user exits are STAE, STAI, and STAR. 


If the failing (terminating) task is a critical system 
task, task ID (TCBTID) is greater than 199, ABEND 
assumes that a STAR exit exists. The STAR exit is for 
critical system tasks only; it receives control only 
after any valid STAE/SIAI exits have been scheduled. 
The critical system tasks that have a STAR exit are the 
master scheduler task, the system error task, the 
communications task, and the IORMS (I/O Recovery 
Management Support) task. 


GTF (generalized trace facility) performs necessary 
recovery procedures if a GTF task is failing. (See 


OS/VS Service Aids for information on GTF.) 


If a STA control block does not exist (TCBSTABB = 0), 
control passes to the Initial Housekeeping Phase 
(Diagram 8.16). 


See OS/VS OLTEP for information on the OLTEP task. 


The scheduling of the user exit routine is suppressed 
if any of the following conditions exist: 


e The DETACH macro instruction was issued for an in- 
complete subtask (TCECMPC = X‘'13E"'). 


e All tasks in the job step are in a 30-minute wait 
(TCBCMPC = X'522"). 


e The limit on the SYSOUT DD card has been exceeded 
(TCBCMPC = X'722'). 


e The failing task, although a job-ster task, is nct the 


highest task in the chain of terminating tasks 
(TCBNTJS = 1). 


Tv PSs 
[ROUTINE | 
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4---—--- oe Str 
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|Inter- | | 
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Diagram 8.15 (Steps 11-14) 
ABEND Interface with ASIR 













Input Processing Output 
Curent TCB -———-——-—=— —— | as 
TCBGTOFM Li}. 41 If GTF has been temporarily suspended yas 
ar . 
= —+ 12 If the task failed while owning the 


supervisor lock 









Current TCB 
WABEEEEREREEG EGE TCBSPVLK=0 


Current TCB 4° — — ——-— 


TCBSPVLK 






Issue WTO 


concerning failure, 


SLKM processing is 
unnecessary or after 
it is completed 


CVTSPVLK= 


CVTSPVLK-1 
ASIR Phase 1 (8.44) 












Current TCB_ @- — — — ———— ee 13 If the failing task is a critical system 
TCBTID task > 11 
Current TCB Po 
SCB = 
TCBSTABB N 
TCBSTABB | p14 Determine whether the top STA control 


ABEND Initial 
Housekeeping (8.16) 


SCBSTAI 


block is for a STAI exit. 


ae 1 
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Diagram 8.15 (Steps 11-14) ABENE Interface with ASIR (Module IEAVTMOO) 


a Oe a cores ge he Ow Gt Set OR OB ef TO BRS ee py oe Gee ae Ge ee eR hap en Gane acre ee eae 
| ROUTINE 


| 
| NOTES | 


| 
The supervisor lock is an indicator used to inhikit | 
entry to disabled code while a disabled page fault is | 
being resolved. it is set ky the Program Check First-_ | 
Level Interruption Handler when a disakled page fault is| 
encountered. It is turned off by the dispatcher when | 
the owner of the lock has been selected as the task to | 
be dispatched. The assumption is that the owner of the | 
lock would not be dispatchable unless the disakled page | 
fault had been handled by the paging task. However, it | 
is possible that ABTERM has wade the owner disrfatchakie | 
to schedule the task for aknormal termination. When | 
ABTERM sets the owner of the lcck dispatchakle, a count | 
of the number of tasks that have failed while owning the| 
supervisor lock is increased in the CVT (CVTSPVLK). The| 
TCBSPVLK flag is set to indicate to ABEND that a message | 
is to be issued to the operator. The SLKM subroutine | 
turns off the supervisor lock flag (TCBSPVLK), decreases | 
the lock count (CVTSPVLK), and issues the message. (Seée| 
OS/VS Job Management Logic for information on the WTO 
routine.) After SLKM processing has completed, the 
TCEABGM flag is turned off and control passes to ASIR. 


# 1), contrcl passes to the Initial Housekeering Phase. 
Otherwise, preparations are made to exit to the ABEND/ 


| 
| 
| 
| 
| 
If the STA control block is not for a STAI exit (SCBSTAI | 
| 
STA Interface Routine (ASIR). | 

4 


NAME 


-}—— — — —— —- _ — + 


LABEL 


STAEXIT 


STASLKM 


NCS PVLK 


t) 
ic] 
+ 
aa 
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From the ABEND/STA Interface routine (8.44), 
the Must-Complete Phase (8.22), or the 
ABEND Interface with ASIR (8.15) to purge 





Processing 


IGC1O01C (alias entry point used 
by ASIR) 

BYSTAE* (entry point used by 
ABEND routines) 


Input 


1 Initialize flags. 


Fixed in lower 4S SS 


Teal storage 


Mark SQEs and IQEs belonging to 
the terminating task to be purged; 
deactivate the TIRB. 


Diagram 8.16 (Steps 1-9) 
ABEND Initial Housekeeping Phase 


Output 


*Note: The ABEND routine has been 
divided into phases according to function. 
This entry point is not a true entry point; 
it is the first label in this phase. 


Current TCB 
TCBFX=1 
TCBABGM=1 


BLURRRERRRRRRABAREEREEEREREERGQGGEEGSE 





ABEND SVRB 


RBABEND=1 


FLCAEQJ IQE 
FLCAEQS ‘SQE 


Current TCB RB 


TCBRBP RBFACTV 


Current TCB <+— — —_ — 


TCBFA ‘3 oif this entry is due to a recursion 


4 Set the ABEND-in-progress flag. 


Current TCB PIE ¢q 5 Free the PIE associated with the 
Current tasks. 


Current TCB 
TCBCSTEP 
TCBCMP 
TCBJSTCB 


SS 6 Determine the top task in the 
chain of terminating tasks, 


7 Obtain a recursion save area; use 
the SQA if necessary. 


4— —_ —_ — 8 If the current task failed while in 


possession of the supervisor lock 


Current TCB 
TCBSPVLK 


Current TCB. 
TCBFSMC 
TCBFJIMC 


SS SS Q Determine the completion status of 
the failing task. 











Dequeve and deactivate 
the TIRB; suppress IQEs 
and SQEs. 










ABEND Recursion 
Phase (8.24) 
Current TCB 


LWRBRARERESEEREERSSEREER EOE Gaaaaaaaa TCBFA= 






| FREEMAIN. 
YT | ABBRANCH 


Free PIE storage in 
subpool 250. 











oul Job-step TCB 


LLALALUEEERESERALEREAERERARARRRRRERE! ABEND SVRB 
Top TCB ESA 

BAA SAAS 

r™ | RMBRANCH 


Allocate storage from 


supboo! 253. 





6.1 


SLKM 


Issue WTO concerning 
failure. 





Current TCB CVT 


TCBSPVLK=0 CVTSPVLK = 
CVTSPVLK=1 





WABREARAA Ba 






Must-complete 


ABEND Must-Complete 
Phase (8.22) 


Not must-complete 
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Diagram 8.16 (Steps 1-9) ABEND Initial Housekeeping Phase (Module IEAVTMOO) 
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| 
| NOTES 


(failing) task: 
e TCBFX -- prevent asynchronous exits. 


e RBABEND -- identify the ABEND SVRB in case of a 
recursion. 


e TCBABGM -- set default for GETMAIN requests from the 
SQA if the LSQA cannot satisfy the request. 


The internal subroutine ATRB first marks all IQEs 
(interruption queue elements) in the AEQJ (IQE 
asynchronous exit queue) to be purged. When the AECJ 
queue has been exhausted, all SQEs (supervisor queue 
elements) on the AFQS (SQE asynchronous exit queue) are 
marked to be purged. IQEs and SQEs are not purged at 
this time because they represent status that might he 
valuable if a SYSABEND dump is provided. These queue 
elements are dequeved and the associated storage freed 
after any attempts to frovide a dump have been made. 
Upon completion of SQGE processing, the TIRB (task 
interruption request block) is tested to see if it is 
active. If the TIRB is not active (RBFACTV # 1), 
control returns to the caller. Otherwise, any SQEsS 
chained to the TIRB are marked to ke purged, dequeued 
from the TIRB SQE queue, and sent to the Stage 2 Exit 
Effector to ke requeuved on the AEQS. When all SCEs have 
been processed, the TIRB is dequeued from the TCB RB 
queue. The TIRB is deactivated to avert an interlock. 
The TIRB is a serially reusakle resource which might 
currently be in use; the entry to ABEND has nade normal 
completicn of its use impossible. 


If a PIE exists for the current task, it is freed so 
that a user SPIE exit routine does not gain control if a 
program check is enccuntered during ABEND. A special 
branch entry (ABBRANCH) into FREEMAIN is used to 

prevent a recursion, which could result because the PIF 
is allocated from user storage. 


boca eee ee ee ae ee ea Se ee ee 


| 
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| ROUTINE 
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| Initial 
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| keeping 
| Phase 


ATRE 
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4 The following flags are initialized for the current 


ATRBMIQE 
ATRBSQES 


| ATRBEND 
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| ATRBSPGE 


ATRBRDQ 
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a aI SR SAC Cs AIRS RC IR Rc Aa eC Wolo a & 
| | ROUTINE | 


| NAME [LABEL | 


+ + 
| Initial |TSTSTEP 
|House- |STEPOPT 
[keeping | 


6 The top terminating task is the highest-level task in 
the chain of terminating tasks. If an ABEND macro 
instruction was specified with the STEP opticn 
(TCBCSTEP=1), the top terminating task in the chain 
is defined by the job-step task (TCBJSTCB); all tasks 
in the job step are terminated. The completion code is 
moved from the current TCB into the job-step TCB. If 
the STEP option has not been specified, the top termin- 
ating task is defined Ly the current (failing) task; 
all incomplete descendants of this task are terminated. 
The completion code remains in the current TCB. 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 7 The top terminating task is used to allocate storage 
| Since storage is requested from subpool 253. If the 
| current task is used, and a STEP option has keen 

| specified, the save area would be freed prematurely 
| when storage belonging to each task is purged. The top 
| terminating task is processed last and its storage can- 
| not ke freed early. 

| 

| 

| 

| 

| 

| 

| 

| 

[ 

| 

| 

| 

[ 

| 

| 


registers are saved in the recursion save area and the 
recursicn flag (TCBABCUR = X‘'01") is set during SLKM 
processing. The recursion flag is cleared ufon return 


from SLKM. 


Q If the task failed while operating in either system- 
must-complete (TCBFSMC = 1), or step-must-complete 
(TCBFJMC = 1) status, processing continues with the 

Must-Complete Phase. A task is in must-complete status 

because it owns critical resources. Other tasks in the 

system or job step are set nondispatchable while the 
must~complete task completes processing and frees the 
critical resources. 


| 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
8 If the supervisor lock is owned by the failing task, the| | 
| | 
| | 
| | 
| | 
| [ 
| | 
| { 
| | 
| | 
| | 
| | 
| | 
| | 
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Diagram 8.16 (Steps 10-16) 
ABEND Initial Housekeeping Phase 









Input Processing 
euene ee a a ame a a eee 10 If the current task is a critical system ABEND Critical 
TCBTID task Error Phase (8.23) 
Selected TCB Register 4 ¢4->--17 11 Set all tasks in the chain of 
I terminating tasks (except the current 
L SELECT 


CBFSM 
ae one SS task and tasks in must-complete 
TCBFJMC urrent T status) nondispatchable. 
Select each task 
in the chain. 





Output 
’ 
Y oe . Selected TCB 
y 3.18 Ae TCBABWF=1 
Aw 


WABEBRRARERAREEEEERSE AEE aaaaa TCBFA=1 






















CVT cee 12 Perform a task switch if necessary to Task Switch 
VITCB é ees | ensure that the task specified by the 
TEE een. new TCB pointer is dispatchable. IEAQDSO2 
New TCB Make next lower- 
TCBABWE priority task the new 
task, 
Selected TCB = = SS 13 Select the top terminating task in 3.16 











TCBFC 
TCBDARPN 
TCBRSPND 


the chain of terminating tasks for 
the current ABEND, 


SELECT 








Select tasks defined 
by the top task. 





All selected 






— a eas aan aa 14 Perform processing for multiple job-~ > =e sesected 12 PEENDS EE 
| TCBISTCR siap fallures. LULA LALRRLLALALALERELARRRRRARRRRREE 





TCBFC 
TCBDARPN 
TCBRSPND 


Current TCB 
TCBLJSND=1 


emi 


IGC07902 
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Dispatcher (3.17) 


Selected TCB JobstepTCB @-7--4 


TCBISTCB L145 if the job-step task is terminating WRBRRRRARRRARRRERRE 


Selected TCB 
ABABA eaaea a’ TCBADINP=0 


16 Turn off the top TCB flag in the Selected TCB 
selected task. WARABALERBERABRRERARABARARARARRERR 


(Continued at Step 17) 
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Diagram 8.16 (Steps 10-16) ABEND Initial Housekeeping Phase (Module IEAVTMOO) 
Sa ne Se ee a en ae ae a ep a ar pacer ae 


The top terminating task is used to find all tasks in 


the chain. 


The initial input to the SELECT sukroutine 


is the complement (negative) address of the TCB repre- 


senting the top terminating task. 


makes the input address positive and returns to the 


caller. 
is assumed to be in the ABEND SVRB ESA.) 


(The address cf the tog terminating task's TCB 
Subsequent 


entries to the SELECT subroutine require, as input, the 


address of the last TCB selected. 


The following order 


is used to find each TCB after the first one: 


If the task represented by the input TCB has 
a subtask (TCBLTC), the outfut is the address 
of the subtask's TCB. 


If the input TCB address is that of the TCB 
representing the top terminating task, all 

tasks in the chain of terminating tasks have 
been selected, and the cutfut is an address of 0. 


If the task represented by the ingut TCE has a 
same-level task (TCBNTC), the output is the 
address of the same-level task's TCB. 


The input consists of the originating task 
(TCBOTC) of the task represented by the input 
TCB. Execution then continues with the test 
for the top terminating task‘s TCB (point 2). 


All eligible tasks are set nondispatchable to prevent 
the task from using a resource that may Le taken by 
ABEND. 


The SELECT sukroutine 


a 
| ROUTINE | 


cc eo oe ee ee = ee ee 


NAME 


Initial 
House- 
keé€ping 
Phase 


SELECT 


The new TCB pointer contains the address of the highest-|Initial 


priority TCB; the task represented by this TCB 
patched next. 
a task specified as new nondispatchable, ABEND 
ensure that the new task is dispatchable. 
Switch routine is called to transform the next 


is dis- 
have set 
ust 
Task 
lower- 


Because previous processing may 


The 


priority task into the new task. 


House- 
keepfing 
Phase 


C 


NEWTEST 
NEWLOOP 


Da ee ee Ne Yad ah ee eg ty ote ge es Wrote ta a —~T 
[ROUTINE | 


| NAME 


[LABEL | 


The top terminating task found earlier is used to find 
all tasks in the chain of terminating tasks; the tasks 
are located in a top-down fashion. If the selected task| 
has completed processing (TCBFC =1), or is ncndispatch- 
able, it is ignored and the next task is selected. | 


If the selected task is a jok-step task other than the 
top terminating task, processing is required to handle 
multiple jokb-step failures. The lowest-level jok-step 
task is terminated first. The SELECT subroutine is 
called to find all job-step tasks lower than the top 
job-sterp task. This processing is only performed if the 
task is neither complete nor ncndispatchable: 

1. An interface is established with ABTERM 
(IEAQABO0, Diagram 8.12) to terminate the 
selected task (using SVC 13) with a completion 
code of X‘'10C‘ and no dump. 


The TCBNTJS flag is set in the selected TCB to 
indicate that a higher-level job-step task is 
awaiting the abnormal termination of the 
selected task. 


| 

| 

| 

| 

{ 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| The current ABEND SVRB is set to foint to 
| location TSTSTDSP (Step 24). 

| The current task is set temporarily nondis- 
| patchable (using STATUS). 

| 
| 
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| 
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| 
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| 
| 
| 
| 
| 
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The registers are saved in the current TCE 
register save area. 


A task switch is ensured ty setting the new TCE 
pointer to 0 if it is the same as the old TCB 
peinter. 


Exit is made to the dispatcher (Diagram 3.17), 
which passes control to the selected task. The 
selected task ccntrols the abnormal termination 
of itself and its subtasks. 


If the job-step task is terminating and a dump has nct 
been requested (TCECREQ = 1), the ABDUMP-in-progress 
flag (TCBADINP) is turred off. This processing is 
necessary because a request for the abnormal termination 
of a task is stacked if it has a subtask that is provid- 
ing an abnormal termination dump. The TCBADINP flag 
setting allows the operator to issue a CANCEI conmand 
for a job-step task while its suktask is in ABCUMP 
processing 


The top TCB flag is turned off because the current TCB 
may hav2 suktasks that are currently aknormally 
terminating. 
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Input Processing 
Selected TCB = ———— —— TTT ==" 17 If the selected task has completed 


Register 6 Register 8 q+------ 18 If the selected task is the job-step 
Address of Address of reek 
job-step TCB selected TCB 
Job-stepTCB @—— meee ee ET - 19 If a previously terminating task has 
TCBSTACK not requested stacking 
SelectedTCB €-—-——-- 7-3 OCOOCcTtT TT — + 20 If the selected task is in OPEN or 
CLOSE processing 
TCBFOINP 
Selected TCB q -—- -— —-—-— ——_—_—— = 21 If the selected task is not in ABDUMP 


processing 


22 Turn off the ABEND nondispatchability 
flag in the selected task. 


Register 8 


Address of 
selected TCB 


Register 4 


Address of 
current TCB 


task if there is no need for special 
processing. 


Top TCB Subtask TCB ¢7+-— = -4 
TCBLTC TCBDARPN | 
TCBRSPND 
| 
{ 
I 

[ = 


24 Determine whether the top task Has 
a subtesk that is set permanently 
nondispatchable. 


Z 
23 Perform processing for the selected p 


> 13 
SSS: 2 3 


> + 4 


> 2 3 





Len 13 


ZAVIAARABAAASBEERESESaaSEsaaaaaaaanaagaaaa» 






MSPURG 


Delete entries in the 
SVC message table. 











ATRB 


Deactivate the TIRB; 
suppress IQEs and SQEs. 


13 


Subtask dispatchable 
or no subtask 


Subtask nondispatchable 


Diagram 8.16 (Steps 17-24) 
ABEND Initial Housekeeping Phase 


Output 


Selected TCB 


TCBABWF=0 


Selected TCB 


i STATUS 
IGC07902 
3.18 


Die ws 


TCBABTRM=0 


TCBABCUR=0 


[TCBFX=1 si 
TCBATT=1 





WTOR Purge 
ee IEECVPRG 


Purge outstanding 
messages. 









|EAPTERM 


| Termination Interface 


Purge paging activity 


and second exits. 


5.57 


Purge |/O 
P liccoiear 
Purge outstanding I/O. 





Mainline ABEND 
(8.17) 


ABEND Critical 
Error Phase (8.23) 
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Diagram 8.16 (Steps 17-24) ABEND Initial Housekeeping Phase (Module IEAVTMOO) 
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|ROUTINE | | 
| NAME | LABEL | 


If the selected task is a jok-step task, the TCBSTACK, |Initial 
TCBFOINP, and TCBADINP flags are not examined. TCBALCINP|House- 
is always set in the jok-step TCB if set in a subtask | keeping 
TCB; the TCBSTACK flag is set to indicate that a higher-|Phase 
level task cannot terminate until a lower-level task | 
completes termination processing. Therefore, it is 

neceSSary to purge the resources specified in Step 23 

even though one of these flags may be set. 


Le 
118 


If stacking has keen requested, the current ABEND 
request is stacked until the OPFN or CLOSE processing 
completes. After determining that stacking is required, 
the STACTCB subroutine performs the following 
processing: 


STACTCB 


Modifies the ABEND SVRB old PSW so that it 
points to the section in the STACTCB 
subroutine that tests for stacking (latel 
STACTEST). 


1. 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 
2. Issues the STATUS SVC instruction to set | 
the current task temporarily nondispatchable | 
(TCBOCAND = 1). | 
| 

3. Ensures a task switch by setting the new TCB | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


foint to 0 if it is equal to the old TcB 
pointer. 


4. Saves registers in the current TCB and exits 
to the Dispatcher (diagram 3.17). 


The current ABEND request must ke deferred when a dump 
data set is being opened. Only cne OPEN macro instruc- 
tion 1S issued for the dump data set, which remains open 
for the duration of the job step. If a CLOSE request 
has been issued, the current ABEND request must ke 
Stacked to avoid suspending CLOSE processing. The durp 
data set is closed cnly wnen the job-step task 
terminates. 


| Initial 
| House- 
| keeping 
|Phase 


| 

If a subtask is in OFEN, CLOSE, or ABDUMP prccessing, i 
the nondispatchability flag is turned off and the next | 
task is selected. No further processing can ke rer- | 
formed on the selected task until OPEN, CLOSE, or ABDUMP| 
processing has completed. | 
i 





C 


SETFLGS 


CS eg a ee oS —T 

|ROUTINE | 
| NOTES | NAME | 
123 The following functions are performed for the selected ines | 
| task: |House- | 
| [keeping | 
| 1. The ABTERM flag to prevent multipie ABEND | Phase | 
| conditions is turned off (TCBABTRM = 0). | | 
| | | 
| 2. The valid recursion flag is cleared (TCBABCUR = | | 
| 0). | | 
| | | 
| 3. The scheduling of asynchronous exits is pre- { | 
| vented (both TCBFX and TCBATT set to 1). | | 
| | | 
| 4. The MSPURG subroutine is called for each task | | 
| other than the current task. This subroutine | | 
| erases entries in the type-1 SVC message table | | 
| associated with the selected task. | | 
| | | 
| 5. The WTOR Purge routine is called to purge out- [ | 
| standing messages associated with the selected | | 
| task. (See OS/VS2 Job Management Logic for | | 
| information on the WTOR Purge routine.) | | 
| | | 
| 6. The ATRB subroutine is called to suppress IQES | | 
| and SQES, and deactivate the TIRB associated | | 
| with the selected task. | | 
| | | 
| 7. The paging Termination Interface routine is | | 
| called to purge all paging activity and second | | 
| exits for the selected task. Second exits | | 
| represent asynchronous prccessing that is | | 
| performed as a result of the completion of | | 
| paging activity required because cf a FIX cr | | 
| LOAD request. | | 
| | | 
| 8. The resident Purge I/O routine is called to | | 
| purge outstanding I/O for the selected task. | | 
| (See OS/VS I/O Supervisor Logic for information | | 
| on the Purge I/O routine.) | | 
[ | | 
| After the processing has completed, the SELECT sub- | | 
| routine is reentered to select the next task. The sare | | 
| processing (Steps 14-23) is performed for the next task. | | 
| | | 
124 After all tasks have been selected, the top terminating | | 
| task is tested. A subtask of the top terminating task | | 
| may have been set nondispatchakle in the following sit- | | 
| uation: Recovery Management Suprort (RMS) set a task | | 
| permanently nondispatchakle due to a machine error. | | 
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Diagram 8.17 
Mainline ABEND Processing 


From the Initial Housekeeping Phase (8.16) 
to prepare for an abnormal dump 


Processing 


Input Output 


*Note: The ABEND routine has been 
divided into phases according to function, 
This entry point is not a true entry point; 
it is the first label in this phase. 


MAINLINE* 
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Address of top TCB 
CVT 
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Alias entry point 
for MSGPHASE 


processing 
Job-step TCB _--_—_— eC 7 
TCBSTACK 


TCBADINP 


Job-step TCB 
TCBJPO 
an 


CDCHAIN RB 
RBLINK 


CDNIC 
CDRRBPA 


| reer 


Current TCB 


TCBABWF 
TCBFA 





Job-step TCB 
TCBPDUMP 


Current TCB 


TCBCREQ 


Job-step TCR 9=<—-— — — — — = 


TCBFDSOP 


Current TCB : 
TCBTIO 


TIOEDDNM 
TIOELNGH 


1 Set the top flag in the TCB of 
the top task, 


2 Issue a message to the programmer for 
each entry in the type-1 SVC message 
table for the current task, 


IGC2001C 


3 Stack the current ABEND request if 
required, 


4 Purge partially loaded programs. 


5 Allow asynchronous exits for the current 
task. 


6 sf the dump is neither allowed nor has 
been requested 


7_~=si(If the data set was opened previously 


8 Examine the data definitions specified; 
use the associated data set as the dump 
data set. 


NNN NANA NANA ANNAN 










MSGPHASE 


IGC2101C 
Issue WTP for each 
table entry. 









Failure in WIP 
MSPURG 


Purge all 
table entries. 


STACTCB 







PARRLSE 


Invoke PRBHOSKP 
and PGPGM, 
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No DD entry or 
invalid entry 






Valid DD entry 
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ABEND Close 
Phase (8.20) 


ABEND Open 
Phase (8.18) 


ABEND Close 
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Diagram 8.17 Mainline ABEND Processing (Module IEAVTMOQ) 
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|ROUTINE | 
| NAME | LABEL 


ke —— a ood 


2 The message table contains entries, supplied by a type-1|Mainline| 
Svc routine, indicating a failure in the SVC routine. | AEEND | 
The MSGPHASE subroutine performs the following |Process-| 
processing for each entry that is for the current task: |ing | 

| 
1. Sets a valid recursion flag (TCBABCUR = X‘'15'). | 
| 

2. Obtains storage for a wessage buffer (from | 
subpool 253) if necessary. | 

| 

3. Converts the completion code in the message 
table into EBCDIC and moves it into the 
message buffer. 


MSGPHASE | MSGFORM 


&. Moves the message into the buffer and ensures 
that the message ID is correct. 


5. Converts the reason code (if specified) into 
EBCDIC and moves it into the buffer. 

6. Moves the jok name and step name into the MSGJOBN 

buffer. 


7. Converts the branch entry return address (if 
applicable) into EBCDIC and moves it into the 
buffer. 


8. Converts the flag field and variable data intc 
EBCDIC and moves them into the buffer. 


MSGFPLG 


9. Computes the message length and issues the WTC 
Macro instruction. 


MSGLNGTH 


10. Clears the valid recursicn flag and zeros the 


message takle entry. 


After all entries have Eeen processed, ABEND is 
reentered at IGcC2001c. 


MSGALL 


If the WTO processing fails, a restart routine is enter-|Mainline 
ed at label RECTIWTP; the MSPURG subroutine is called | ABEND 
to purge all entries in the wessage takle for the | Process- 
current task. Processing then continues with Step 3. Jing 
NOTE: The MSGPHASE subroutine is located in module 
IEAVTM01. 





3 If stacking is required, certain processing already IGC2001C 
initiated by a subtask (such as OPEN, CLOSE, or ABDUMP 
proceSsing) must be completed before filling the current 
ABEND request. 

4 All partially loaded programs must be purged because of RLSEPGM 

possible interlocks. An interlock might occur if later 

ABEND processing requested that a program be loaded 

which contents supervision queues indicate was already 

being loaded. Contents supervision would queue the 

ABEND request and await the completion of the loading 

Frocess. However, the program would never be loaded 

because ABEND has already purged the I/O required to 

load the program. After examining the CDEs (contents 
directory entries) associated with the job pack area 
queue, PARRLSE performs the following functions for 
programs that are not in storage: 


PARRLSE |PARRLOOP 
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Asynchronous exits are allowed because system services 


Invokes the PGPGM subrcutine if the CDE 
indicates that there is nct a related RB 
(CDRRBPA = 0). The PGPGM sukroutine first 
determines whether an extent list has Leen 
formed; if so, PGPGM frees storage occupied 
by the program and extent lists from sukpocl 
251 or 252. The CDE is then dequeued from the 
job pack area queue. If the CDF foints to a 
RB, the RBCDE field is set to 0. The CDE is 
then freed from subpool 255. This processing 
is continued until all CDEs have been freed. 


Invokes the PRBHOSKP subroutine to restart 
tasks that are awaiting the completion of the 
loading process. PRBHOSKP is invoked if 
either of the following conditions exist: 

(a) the RB associated with the CDE is queued 
to the current task's ICH, or (b) the CDE is 
not associated with the current task, Eut the 
task with which it is associated is in an 
ABEND wait state and in the process of being 
abnormally terminated. (It is assumed that 
the I/O operations for the associated task 
have been purged so that any tasks awaiting 
the loading of the program must Le restarted.) 
The PRBHOSKP subroutine frocesses all RES cn 
the wait queue. It first sets the wait 

count (RBWCF) to 0 and points the RB old PSW 
to entry point CDCONTRI (contents supervision). 
The RB is then dequeued from the wait queue 
and the RBCDE and RBPGMQ fields are set to 0. 
The CDE use count (CDUSE) is decremented, and 
the TCB asSociated with the RB is located and 
a task switch is performed if necessary. The 
next RB is then processed. When all REs have 
been processed, control is returned to 
PARRLSE, which invokes PGPGM. 


require their use. 


The dump data set may have been opened earlier as a 


result of a previous entry into ABEND by a suktask in 


the same jok step as the current (failing) task. 


ABEND scans the TIOT (task I/O table) and uses the last 
SYSABEND or SYSUDUMP DD entry as the data set definit-— 
tion for the dump data set. 


the user cannot be certain of what type of dump he 
receives because dynamic allocation uses the TIOT 


entries in a random fashion). 


If a DD entry is not 


found, or a dummy CD entry or invalid length is 


specified, control passes to the Close Phase (Diagram 


8.20). 


(In a TSO environment, the 
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From Mainline ABEND (8.17) to open the dump 
data set in preparation for ABDUMP processing 


Input 






Job-step TCB 


TCBFDSOP 


4 


aa 


Preassembled 
DCB 





TIOT 


TIOEDDNM [TT 


Current TCB i 
TCBFQE 


TCBLLS 


DCB — YH or 
DCBOFOPN 
Current TCB ——] 
TCBDEB See 
ed er ea ena im | 
TCBFT L_—— 
Job-step TCB DEB ¢+-—- 
TCBDEB DEBABEND L___.__ 


Processing 


IGCO101C 


1 ‘If the dump data set is open 


2 Set OPEN/CLOSE and stacking flags. 


3 Construct a DCB for the dump data set. 


4 Maintain a record of programs loaded, 
and pages fixed during OPEN 
processing. 


5 Open the dump data set. 


6 Determine whether the dump data set 
was successfully opened. 


7 Restore pointers saved before opening 
the data set. 


Bs CTurn off the OPEN-in-progress and 
recursion flags; restart tasks that were 
stacked, 


Q Restore pointers. 


10 Exit to the ABDUMP Phase. 


Diagram 8.18 
ABEND Open Phase 
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Current TCB 
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No storage 
on 8 


LARRABEE BE SARERREEEREERER 


Current TCB 


TCBFOE=0 


fo eave (SVC 19) 
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Current TCB 
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é RESETHI STATUS 
Restart tasks. fe IGCO790? 
3.18 


ABEND ABDUMP 
Phase (8.19) 
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ABEND ABDUMP 
Phase (8.19) 








Job-step TCB 


TCBSTACK=1 
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DEB 
DEBABEND=1 


Job-step TCB 
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Diagram 8.18 ABEND Open Phase (Module IEAVTM01) 
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The OPEN/CLOSE flag is set to ensure that I/C associat- 
ed with OPEN processing does not get purged as a result 
of the failure of the originating task. Suksequent 
entries to ABEND are stacked until OPEN processing has 
completed. 


Before constructing a DCB, the following processing is 
performed if the current task is not the job-ster task. 
A GETMAIN macro instruction is issued, inmediately 
followed by a FREEMAIN macro instructicn. This ensures 
that there is an SPQE (subpool queue element) fcf 
subpool 250. The jok-step TCBMSSB field is updated. 

A GETMAIN request is issued for 88 bytes of storage in 
subpool 250. If there is none available, the DCE 
pointer is set to indicate there will ke no dump. 
Execution continues with Step 8. If storage has been 
allocated, a preassembled DCE and the appropriate DD 
name are moved into the allocated area. An internal 
switch is set to indicate the type of data set - 
SYSABEND or SYSUCUMP. The system must be enabled 
during this move. 


Because the dump data set remains open for the duration 
of the job step, the associated control blocks must be 

queued to the job-step task so they are not furged when 
a subtask terminates. Any modules loaded by OPEN must 

remain open for the duration of the job step. A record 
of all pages fixed by OPEN (FIX ownership elements) is 

also saved. 


NOTE: This processing is unnecessary if the current 
task is the job-step task. 





Before opening the data set, a valid recursicn flag 
(TCBABCUR = X‘'11") is set and registers are saved in 

the recursion save area. The valid recursicn flag is 
cleared up on completion of OPEN processing. (See CS/VS 
OPEN/CLOSE/EOV Logic for infornation on the Cpen 
routine.) 





This test is made while the system is enabled. If the 
data set was opened, flags are set to indicate that fact 
and to identify the dump data set. ABEND also sets a 
flag (TCBFABOP) in the job-ster TCB to indicate if the 
dump is a SYSABEND or SYSUDUMP Gump. This flag is used 
to determine the format of additional ABEND durgs. 


The following processing is performed if the current 
task is not the jok-sterp task: 

1. The TCBMSSB field is restored in the current 
task"s TCB. 


2. Subroutine REQILE is called to ensure that new 
Erograms are queued to the job-step task's 
load list. 

3. The dump data set is dequeved from the current 


TCB and queued onto the jok-step TCB. 
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If the CEB cannot ce located, 


The FIX Ownership Element (FOE) Merge routine 
(Diagram 5.26) of the paging supervisor is 
called to merge pages fixed during OPEN 
processing with pages currently fixed ry the 
job-step task. 


The paging supervisor FIX Purge routine 
(Diagram 5.58) is called to free FOES queued to 
the current task. 

6. The original FOE pointer (TCBFOF) is restored 
to the current TCB. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
After turning off the nondispatchability flag TCEOCAND | 
(using STATUS), RESETHI examines the TCBFT flag in the | 
top terminating task's TCB to determine whether a | 
higher-level task failed and was stacked by ABEND | 
(TCBFT=0). RESETHI sets the current task nondispatchabkle| 
(STATUS sets the TCBABWF flag on), ensures a task switch| 
if necessary, and passes control the the dispfatcher to | 
effect a restart at the point where processing was | 
suspended. If the TCBFT flag is set, a higher-level | 
task was not stacked. However, if a higher-priority | 
task in the same job step as the current task had keen | 
stacked, a task switch could have Leen indicated as a | 
result of the interface to the STATUS routine. The | 
ABEND SVRB is set to point to the code in the RESETHI | 
subroutine (label RSETST) which tests for a task | 
switch. Control then passes to the dispatcher, which | 
passes control to the higher-priority task. | 
| 
The valid recursion flag is cleared (TCBABCUR=0). | 
If the data set was not opened, pointers must be 
restored before informing the programmer of the error. 
When the current task is the job-step task, these 
pointers are not restored. The functions consist of 
the following: 
1. FOEs queued to the current task are freed ry 
the paging supervisor FIX Purge routine. 
2. The FOE pointer (TCBFOE) is restored to the 
current TCE. 
3. New and old programs are queued to the current 
task"s load list by RECLLE. 


informing the programmer of the failure to open the 

data set. A valid recursion flag (TCBABCUR = X‘'13') is 
set during WTO processing. After the message has been 
written, the valid recursion flag is cleared 
(TCBABCUR=0), the buffer is freed and the DCF pointer is 
cleared to indicate that no dump is to be previded. 
tasks that were stacked are now restarted (Step 8). 


Any 


control enters the ABDUMP 
Phase at label SETPD¥P (Diagram 8.19, Step 10). Other- 
wise, the ABDUMP Phase is entered at DMPHASE with the 
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| 
A buffer is obtained and a message is constructed | 
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| 
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| 
address of the dump data set DCB provided. | 
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Diagram 8.19 (Steps 1-5) 
ABEND ABDUMP Phase 


From the ABEND Open Phase (8.18) 


to provide a dump a 
Processing 


DMPHASE* * Note: The ABEND routine has been divided 
into phases according to function. This entry 
point is not a true entry point; it is the first 
label in this phase. 


1 If the dump is not to be provided ABEND Close 
Phase (8.20) Output 





Current TCB 


TCBGTOFM 2 Suspend GTF if necessary. nel HOOK 


EID=|EAABOF 


3 Allocate the dump data set to the 


current task. ENQ 


IGC056 


3.9 


4 Allow allocation for the dump data 
set from the LSQA only; stack ABEND 


Current TCB Job-step TCB 


requests if necessary. LULUBARERLBARRRRRRERARRRRRRERR 


TCBADINP=1 


STACTCB 


CYT SNAP Macro 


CVTIGTFS 5 Display the current task's resources. 
CVTFORM 


ABDUMP 


c~ 
RQ 
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ABDUMP failure 
WTO 


me Inform programmer 


that SINAP failed, 


ABDUMP failure 
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(Continued at Step 6) 
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Diagram 8.19 (Steps 1-5) 


2 Under the following circumstances, GIF is suspended to 
minimize changes to the trace: 


e GTF is active (CVTGTFS = 1). 


e The “in-core" trace was specified with the fcrmatt- 


ing option (CVTFORM-1). 


e The current task has not already suspended tracing 
(TCBGTOFM = 1). 


e The user requested a SYSABEND dump (TCBFABOP 
indicates SYSABEND). 


4 The current ABEND request is stacked if it is awaiting 
the completion of some event. Allocation for the durp 


data set is only possikle from the LSQA because the dump 
data set requires a large amount of storage and the SCA 


is a critical system resource. The ABDUMP-in-progress 
flag (TCBADINP) is set prior to invoking the ABDUMP 
routine. 


S The ABDUMP parameter list is constructed with the 
appropriate options specified: 


e SYSABEND -- entire dump 


e SYSUDUMP -- problemr-frogranm save areas and system 


control blocks associated with the problem program. 


e GTF -- cnly if a SYSABEND DD was specified, and GTF 


is active. 


Prior to issuing the SNAP macro instruction, 
interruptions are disakled by MODESET, and the valid 
recursion flag is set (TCBABCUR=X‘'12'). This flag is 
cleared upon completion of ABDUMP processing. If 


ABDUMP processing fails (return code is greater than 0), 


a message is constructed informing the programrer that 
the dump failed. The valid recursion flag is cleared 
and then set (TCBABCUR = X‘'14') during WTO processing. 
Upon return from WTO, the valid recursion flag is 
cleared (TCEBABCUR=0), and the message buffer storage 


acquired earlier is freed (by RMBRANCH). The ABDUMP-in- 


progress flag (TCBADINP) is turned off in the current 
and job-step TCBs. ‘Tasks that were stacked are 
restarted (using RESETHI), asynchronous exits are rer- 
mitted, and registers are restored before entering 


cleanup processing (Step 9). (See OS/VS2 Jok Management 


Logic for information on the WTO routine.) 
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Diagram 8.19 (Steps 6-11) 
ABEND ABDUMP Phase 


Processing Output 













Current TCB Job-step TCB 


TCBFS=1 TCBADINP=0 
TCBADINP=0 


6 Indicate that the current task's resources CRBRRRRRRRERRREEEEEEEEREEREER 
have been displayed; restart tasks that 


were stacked. RESETHI 


Input 


Top TCB Subtask TCB @- ——_ i — 7 


TCBLTC TCBFS 


Select remaining subtasks and display 
their resources. 






TSLO 


Select subtasks of 
the current task, 


Job-step task 


CoMentlCe Antecedent TCB_@ -———— ——— — — 8 Display the resources of the direct selected 


TCBOTC [ antecedents of the current task. 
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Current TCB 
Q Perform cleanup processing. ALABAAARARERRELAEREREARERRE EERE 


pe [cco 
From the ABEND Open 





Phase (8.18) when a dump Dequeve the dump 
is data set. 
Is not given 
3.10 
10 Prevent the dump of a task's ABEND Close 
resources. Phase (8.20) Job-step TCB 
From the ABEND Recursion LWABRAEEARRSE EEE SOSEGEESEaaaaa’ TCBPDUMP=1 
Phase (8.24) to route control 
on a recursion ABEND Close 
Phase (8.20) 
IGCIIOIC 
Current TCB —s a ToT 1 Return to the failing point as indicated 


TCBABCUR by the recursion flag. ABEND 
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Diagram 8.19 (Steps 6-11) ABEND ABDUMP Phase (Module IEAVT¥N01) 
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7 The 


TSLO sukroutine selects the lowest-level task in the| 


chain of terminating tasks first. On the initial entry 
into TSLO, the input consists of the complement 
(negative) of the top terminating task‘s TCE address. 
If the top terminating task has a subtask (TCBLTC), the 
address of the lowest-level subtask's TCB is the outrfut 


for 


the first entry; otherwise, the input TCB address 


is also the output. For subsequent entries into TSIC, 


the 


input consists of the address of the last TCE 


selected; the selection of the lcwest-level task 
proceeds as follows: 


1. 


If the task represented Ly the input TCB address 

has a same-level task (TCBNTC), the lowest-level 
subtask of that task is selected. If the same-level 
task has no subtasks, then the same-level task is 
selected and constitutes the output for this entry 


If the task represented by the input TCB address 
does not have a same-level task, the originating 
task (TCBOTC) of the input task is selected as 
output from TSLO. 


If the subtask has not been dumped previously, 


the 


1. 


2. 


3. 


4. 


After ABDUMP processing has keen completed, the follow- 


ing 


1. 


After all subtasks have been dumped, the rescurces own- 
ed by the current task's immediate antecedents are 
displayed (Step 8). Should ABCUMP processing fail, the 
message described in Step 5 is ccnstructed and sent to 


the 


following processing is rerfcrmed: 


The current ABEND request is stacked Ly the 
STACTCB subroutine, if necessary. 


The ABDUMP-in-progress flag (TCBADINP) is set 
in the current and job-ster TCBs. 
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Registers are saved in the recursion save area and 

the valid recursion flag is set (TCBABCUR = 

ABDUMP is invoked by the SNAP macro instruction. 

A subtask dump is identified by an ID of 001. 
functions are performed: 


The valid recursion flag is cleared (TCBABCUR=0). 


TCBFS is set to 1, indicating that the suktask 
has been dumped. 


The ABDUMP-in-frogress flag is turned off. 


Tasks that were stacked are restarted ky the 
RESETHI subroutine. 


The next subtask is selected to ke dumped. 


programmer. 
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8 only the direct antecedents of the current task which 
are in the same job step are dumped. The preparations 
for calling ABDUMP, and the processing after ABDUMP has 
returned control are similar to that described fcr a 
subtask (see Step 7). The resources displayed are the 
same as for a subtask; the IC for an antecedent is 002. 
However, the TCBFS flag, indicating that a subtask has 
been dumped, is not set. If ABDUMP fails, processing 
continues as in Step 5S. The antecedents are selected 
and processed until the job-step task is enccuntered; 
cleanup then begins (Step 9). 


The following cleanuf processing is performed: 


The GETMAIN default flag (TCBABGM) is set to 
allow allocaticn from the SQA. 


A DEQ macro instruction is issued for the durp 


data 


set. 


The valid recursion flag (TCBABCUR) is set to 


QO. 


The Close Phase is entered. 


IGc1101C is the recursion entry foint for module 
IEAVTMO1. 
flag setting, control passes tc a foint subsequent to 
the location at which the failure occurred. 
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Diagram 8.20 (Steps 1-9) 


ABEND Close Phase 
From Mainline ABEND (8.17) and the ABEND C 


ABDUMP Phase (8.19) to erase completed tasks 
and close data sets 


Input Processing 
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4 Make selected tasks dispatchable. 
. P| 1007902 


TCBABW F=0 
TCBSTPCT=0 


3.18 a 
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RE Re RRURRUVRREREREY 
5 Process the ABEND SVRB. 










Entry to purge 
resources 


6 Exit to the dispatcher. Dispatcher (3.17) 


ENTRY 2 





7 Purge unexpired TQEs and TAXEs. 


IEAQPGTM 
8.7 Current TCB 


LRRRRRRRREREEEEEEEREGgREEGEG GEE EQaaaaana een] rcerx-1 | CBFX=1 
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TCBPIE Lt Q Purge the PIE if it exists. | FREEMAIN 


ABBRANCH 


Free storage in 
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Diagram 8.20 (Steps 1-9) ABEND Close Phase (Module IEAVTM02) 
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| ROUTINE 


1 The TSLO subroutine is called to select lower-level | Close 
tasks in the chain of terminating tasks. For all tasks |Phase 
that have ccmpleted execution, the Erase TCB sub- | 
routine of the End-of-Task (FOT) routine is called 
to erase the TCB. 


GETLOTCB | 


This processing is performed cnly for incomplete tasks. 


The selected task is set dispatchakle so that closing of 
each data set can be performed under control of the 
task that issued the OPEN request. 


> 


| 

| 

[ 

[ 

| 

| 

| 

| 

! 

| 

| 

| 

| 

| The ABEND SVRB is moved to the selected task"s RB queue. 
| The resume PSW is set to point to entry fpoint ENTRY2 
| (see Step 7). Registers are moved from the TCB to the 
l ABEND SVRB. 
[ 
{ 
| 
| 
l 
[ 
| 
| 
l 
| 
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| 
| 
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Before exiting to the dispatcher, the STATUS SVC is 
issued to set the current task nondispatchable. A task 
switch is performed (by the Task Switch routine) to 
ensure that the new TCE pointer is set to 0 if it was 
equal to the old TCB pointer. The dispatcher causes the 
selected task to receive control at entry point ENTRY2. 


7 The EOT Purge Timer sukroutine is called to perform the 
necessary purges. TAXE purges arrly only to TSO tasks. 


8 Later close processing may require the use of asynchron- 
ous exits. 
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Processing 
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Close any open data sets. 


CLOSE (SVC 20) 


No open data sets 


> 2 | 
> 2 0 


*Note: The processing for Steps 12 - 19 
is located in module IEAVTM04, 


If the data set was closed 


1GC0401C* 


IGGIFFO2 


GETMAIN 


“RMBRANCH 


Close the open data set. 


Obtain storage for a message buffer; 
move the preassembled message into 
the buffer. 


Obtain storage from 


subpool 253. 


Validity Check 


IEAOVLO2 
Check validity of 


If the DCB is not in real storage 


DCB address . 


3.19 


Determine whether the DEB address DCB address invalid 
in the DCB is the real DEB address. > 16 


Purge the DEB from the job-step DEB 
table. 


DEBCHK 


FREEMAIN 


Dequeue the DEB from the TCB DEB 
queve, and free DEB storage. 


Free DEB storage 


in subpool 254, 
Initialize the message buffer. In suDpoo 7 


Inform the programmer that CLOSE WTO 
processing failed. 


(Continued at Step 20) 
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Diagram 8.20 (Steps 10-19) 
ABEND Close Phase 


2g UOT39aS 


uoT }eUTMASL 


€8S 


Diagram 8.20 
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(Steps 10-19) ABEND Close Phase (Modules IFAVTMO2 and IEAVTMO4) 
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The STACTCB subroutine is invoked to a stack AREND | 
request if required. The OPEN/CLOSE and stacking flags | 
(TCBFOINP and TCBSTACK) should be set so that CLOSE fro-| 
cessing is not interrupted. A valid recursion flag | 
(TCBABCUR = X°41') is set during CLOSE processing. (See| 
OS/VS OPEN/CLOSE/EOV Logic for information cn the Clcse 
routine.) 


At this point, IEAVTM04 executes code generated Ly the 
IGGIFFO2 macro instruction. This code checks for a GAM 
(graphics access method) DEB, zeros GAM information from| 
UCBs (unit contrel kiocks) associated with GAM DEBs, and| 
issues a FREEMAIN macro instruction to free any TEEs { 
associated with GAM CFBs. For additional information on| 
the IGGIFFO2 macro instruction, see OS/VS Graphics 


Access Method Logic. 


Both the ddname and the DEB address in the DCB must Lce 
in real storage. If the Validity Check routine finds 
the DCB address to be valid, the DCB address is 
referenced to cause a missing fage interruption (page 
fault). (The system is enabled while referencing the 
DCB.) The DCB is then tested again to determine whether 
it has been Erought into real storage. 


If the CEB address in the DCB is equal to the DEB 
address, the ddname is obtained from the TIOT and moved 
into the message buffer. Otherwise, the ddname is 
obtained from the DCR. 
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! 
See OS/VS OPEN/CLOSE/EOV Logic fcr informaticn on the | 
DEBCHK routine. | 
| 

The following elements are moved into the message | 
buffer: | 
| 

e JS or ST (jok step or task failure). | 
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e DEP address (converted into printable characters). 


e Completion code from the SVRB (if not 0). 
The completion code is then zeroed out. 


e Message length (message text ccmpressed ry the 
Compact subroutine). 


Before issuing the WTO instruction, a valid recursion 
flag (TCBABCUR = X‘'42") is set and registers are saved 
in the recursion save area. After the message has been 
issued, the recursion flag is cleared and the ressaqde 
buffer is freed. 
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Diagram 8.20 (Steps 20-26) 
ABEND Close Phase 
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20 Restart tasks that were stacked. 
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21 {f the current task failed while 
owning the supervisor lock. 
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CVT 
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ENQ@Q Manual Purge 
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22 Set OPEN/CLOSE-in-process and y 
stacking flags; purge queued 4 
resources, 


23 Purge IQEs and SQEs on the 


asynchronous exit queues, 


PRGQ 


SVC 102 


2.4 Cancel outstanding TCAM and TSO 
interpartition POST requests. 


Cancel TCAM, 
QTIP 


Root (Cancel 150 
25 Determine whether the top No 
terminating task has been processed , > 
Yes 
a ABEND Final 


Housekeeping Phase (8.21) 


IGC1401C 


26 Return to the failing point as 


indicated by the recursion flag. PEED 
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Ciagram 8.20 (Steps 20-26) ABEND Close Phase (Modules IEAVTéM02 and IEAVTMO4) 
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20 


21 


22 


23 


24 


If the current task does not require suspension, 
control passes to entry point ENTRY2 to process the 
next DEB on the TCBDEB queue. This processing (Steps 
7-20) is performed until all DEBs on the current task 


queue have been processed, at which point the supervisor 


lock flag is tested (Step 21). 


A valid recursion flag (TCBABCUR = X'22') is set during 
SLKM processing, and cleared upon return from SLKM. 


Because purge processing cannot be interrupted, 
current ABEND request stacked. The ENQ Manual 
Purge routine is called to purge resources. (See 
"Secticn 3: Task Supervision" for information on the 
ENQ Manual Purge routine.) A valid recursion flag 
(TCBABCUR = X'21') is set to intercept the aknorral 
termination of EXCP when issued to release a shared 
DASD device, possibly resulting in an I/O error. 


any 


After ENQ processing has been completed, OPEN/CLOSE, 
stacking, and valid recursion flags are cleared. 
The RESETHI subroutine is called to restart tasks. 


The PRGQ subroutine first dequeues all IQEs 
(interruption queue elements) associated with the 
current task from the AECJ (IQE asynchronous exit 
queue). The high-order kyte in the last IQE is set to 
X'FF*" to indicate the end of the queue. After all IQEs 
have been dequeved, all SQES (supervisor queve elements) 
associated with the current task are dequeuved from the 
AEQS (SQE asychronous exit queue). The high-order 

byte in the last SQE is set to X'FF', and control is 
returned. 


If a TCAM task is present (CVTAQAVB) and it is 
the MCP (Message Control Program), the following 
processing occurs: 

1. An SVRB is oktained (using GETMAIN). 

2. The SVRB is queued to the top of the RB queue. 


3. The SVRB is formatted and ABEND's RBABEND=0 save 
area is copied. 


Wu. The resume PSW in the second RB is set to label 
TSOPOST. 


5. Registers are saved in the recursion save area; the 
valid recursion flag is set (TCBABCUR=X'23'). 


6. The input to the TCAM routine is set identical to 
that produced by the SLIH. 


7. An XCTL instruction is issued to pass control to the 


TCAM routine IED¢C0T01, which returns control to 
label TSOPOST if processing is successful. 
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Should an error occur during IEDCOTO1 processing, or if 
the MCP task is not present, ABEND tests if TCAM is 
active (CVTAQAVT). If so, ABEND saves registers in the 
recursion save area, sets the valid recursion flag 
(TCBABCUR=X'23'), and issues an SVC 102 instruction to 
cancel TCAM interpartition Post requests. 


If TCAM is neither present nor active, the valid 


recursion flag is cleared (TCBABCUR=0) before ABEND can- 


cels TSO interpartition Post requests. 


See OS/VS TCAM Logic for informaticn on SVC 102. 


See OS/VS2 TSO Contrcl Program Logic for information on 
the QTIP routine. 


If the current task is the top terminating task, close 
processing is complete and the Final Housekeeping Phase 
can be entered. Otherwise, close processing is re- 
entered to process the lower-level tasks that have not 
already been processed. 


IGci40ic is the recursion entry foint for module 
IEAVTMO4. From this point, kased on the exact 
TCBABCUR flag setting, control fasses to a feint 
subsequent to the location at which the failure 
occurred. 


Reentry Point 
A search is first made to find the 


DFB. If found, 
is executed to close the data set. 
If the DEB is not found, a message 
buffer is obtained from subgecl 253, 
and the message is issued to the 
programmer. 


Recursion Flag 
x"41" 


AFTCLWTP 


the macro instruction 


|Close 
| Phase 


CLOSFAIL| 
NOLEB | 
NODDNAME | 
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Diagram 8.21 (Steps 1-7) 


ABEND Final Housekeeping Phase 
From the ABEND Close Phase (8.20) to 
purge resources 


Processing 
HOUSKEEP* 


Input 





*Note: The ABEND routine has been divided 
into phases according to function, This entry 
point is not a true entry point; it is the first 
label in this phase. 


4 Select the lowest-level task in the TSLO 
chain of terminating tasks. 


Register 4 


Address of current TCB 





2 Purge pages that have been fixed 


by the selected task, FIX Purge 


cae IEAPFIXP 


5.58 
RB : 


RBLIN KB 


Selected TCB 
TCBLLS 4 Purge programs loaded for the selected Ri lence Conded Programs 


task. 
fas IEAQABL 


5 Free storage allocated to the selected 
task; purge unfilled STAE/STA] requests. 






REMOVERB 


Purge RBs, CDEs and 
programs, 


3 Purge RBs and associated resources. 





8.8 


Release Storage 


|” TEAQSPET 
8.9 


Register 4 


Address of current TCB 6 lf the selected task is the current task | FREEMAIN 


IGC005 
Free SCB storage. 
6 





ay O 


7 Remove the selected task's TCB from the 


dispatcher's priority queue. Dequeve TCB 
mel IEADQTCB 
8.5 


(Continued at Step 8) 
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Diagram 8.21 (Steps 1-7) ABEND Final Housekeeping Phase (Module IEAVTM02) 


The lower-level tasks are purged first to eliminate 
conflicts arising as a result of shared resources. 


The REMOVERB subroutine is called to purge resources 
associated with the task‘s RB queue. The input to 
REMOVERB consists of the address of the RB that is 
queued tc the ABEND SVRE if the selected task is the 
current task. Otherwise, the top RB on the TCE RB 
queue is provided as input. REMOVERB performs the 
following functions: 


e Makes a serially reusable resource, which is ccn- 
trolled by the RE, availatle for other tasks. 


e Purges all resource requests not fulfilled at this 
time. 


e Purges control blocks and work areas asscciated 
with a module that the RB has requested and which 
has not been loaded. 


e Frees storage occupied by the RB, unless the RE is 
Static (RBDYN), or is the last RB queued to the 
current TCB. If the RB is static, the storage 
cannot be freed Ltecause it was not dynamically 


allocated to the task. If the RB is the last RB for 


the current task, the storage is needed when the 
interface to the End-of-Task (EOT) routine is 
established. 


(See Chart 8-1 for detailed information on the REMOVERB 
subroutine. ) 


The Release Loaded Programs subroutine purges the 
necessary loaded programs and control Llocks. 


The Release Storage sukroutine frees the storage 
allocated to the selected task in its own sukpool. In 
addition, storage in the LSQA and SQA is freed from 
subpool 253. All STA control blocks are freed from 
subpool 253. 


Upon return from the Dequeuve TCE subroutine, the TCBFC 
flag is set to indicate that the task has conpleted 
processing. 
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Diagram 8.21 (Steps 8-14) 
ABEND Final Housekeeping Phase 


Processing 


8 Purge the selected task's TCB. Erase TCB 
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Curent1TCR Q@—-——-)-———-—--——_— Q If the current task is a job-step task 


that is not the highest-level task in 
TCBNTJS the chain of terminating tasks a 11 1 


SVC 3 
10 Enter the End-of-Task routine. . 8.3 


11 Remove the current task from the 


dispatcher's priority queue. De TCB 
; queue O 
ea utput 


IEADQTCB 
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Originating TCB 
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12 Set completion and dispatchability 


flags. : " STATUS 
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From the ABEND Recursion ere) rase TCB 
Phase (8.24) to route IEAQERA 
control on a recursion ea 
IGC1201C 
Dispatcher (3.17) 
Current TCR: 14 Return to the failing point as indicated 


TCBABCUR by the recursion flag. ABEND 
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Diagram 8.21 (Steps 8-14) ABEND Final Housekeeping Phase (Module IEAVTM02) 
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8 The Erase TCB subroutine dequeues the selected TCB and [Final 
frees the storage cccupied Ey the TCB. The next task is|House- 
then selected and processed (Step 1). | keeping 

| Phase 


Q If the current task is a jok-step task that is not the 
highest-level task, a test must be made to deternine 
whether multiple job-ster failures have occurred. 


10 ABEND places the ccmpletion code in register 15 and 
exits to the End-of-Task routine. EOT frosts the ori- 
ginating task's ECE and/or schedules the originating 
task's ETXR routine. If neither action was specified 
when the task waS created, EOT erases the current task. 


The Dequeve TCB sukrcutine removes the current task. 


1 

2 The nondispatchakility flag (TCBLJSND) was set earlier 
by ABEND when it was determined that a multiple job-step 
failure had cccurred. At that time it was necessary to 
stack the higher-level job ster until the lower-level 
job step had been terminated. A task switch is perform- 
ed if necessary. 


13 If the ABEND SVRB points to the TCB, the Erase TCB 
subroutine purges the last RB and the TCB of the current 
task. EOT exits to the Dispatcher, which passes ccntrol 
to the originating task. The originating task then 
reenters ABEND processing at the point at which it was 
suspended. Otherwise, the RH queued tc the ABEND SVRB 
is dequeued from the selected task's RB queue. If the 
RB is not an IRB or TIRB, but is a dynamic RE, FREEMAIN 
is called to free the RB previcusly queued tc the ABEND 
SVRB. The next RB (RELINK is then tested. 


FINAL 


14 1GC1201c is the recursion entry point for module 
IEAVTMO2. From this point, kased on the exact TCBABCUR 
flag setting, control passes to a point subsequent to 
the location at which the failure occurred. 


Recursion Flag Reentry Point 
X"21° ENOPG 
x*22" ENQPURG 
X'23' TSOPOST 
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Diagram 8.22 

ABEND Must-Complete Phase 
From the ABEND Initial Housekeeping Phase 
(8.14) to process tasks that failed while in 
must-complete status 


Input 


Register 4 Current TCB ¢+ 


Address of TCBFJIMC 
current TCB 
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Address of job-step TCB 
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Address of Address of 
EN@ ID major QCB 
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Processing 
1GC0301C 


1. Purge critical resources and attempt 
to provide a dump, 


2 Inform the programmer of the name 
of the task that failed in must- 
complete status, 


3 Group QELs representing a single 
ENQ request. 


4 Determine whether the resources 
owned by the current task are 
critical, 


5 if the current task controls any 
must-complete resources. 


6 If the current task still operates 
in must-complete status. 


7 Prepare for abnormal termination 
of the job step. 


8 Reenter ABEND at entry point 
IGCIOOIC for noncritical tasks, or 
IGCOO0IC for critical system task. 
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CRITPURG 


Purge paging, I/O, 
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SVCDUMP. 
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Diagram 8.22 ABEND Must-Complete Phase (Module IEAVTM03) 
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The CRITPURG subroutine calls the follcwing routines to 
purge resources for the current task: 


1. Termination Interface (Diagram 5.57) -- purge 
paging activity. 


2. Purge I/0 -- purge I/O activity. 
3. WTOR Purge -- purge WIOR requests. 


Before calling SVCDUMP to take a system dump, a valid 
recursion flag (TCBABCUR = X'34') is set. If the 
SVCDUMP routine is unsuccessful (return code # 0), a 
valid recursion flag is again set (TCBABCUR = X'35'), 
and a message buffer is allocated from subpocl 253. 
After the message text has been built by the internal 
subroutine BLDMSG, a WTO instruction is issued indicat- 
ing that the SVCDUMP routine failed to provide a dump. 
The buffer storage is then freed, recursion flags are 
cleared, and executicn continues. 


The message buffer is oktained from sukpool 253 by the 
RMBRANCH routine; the message text is Euilt Ey the 
BLDMSG subroutine. A valid recursion flag (TCBAECUR = 
X'31') is set across WTO processing; it is cleared urfon 
completion of processing. 


Because the current task may have issued more than one 
ENQ request, it is necessary tc isclate all resources 
allocated as a result of each separate request. How- 
ever, Since there can be only a single resource 
allocated on a RESERVE request, it is not necessary to 
try to group RESERVE requests. The MCCEL sukrcutine is 
called to locate must-complete QELs for the current 
task. After a must-complete QEL is located, the ENC 
request ID is saved to identify the request. The MCQEL 
subroutine is invoked again to find additional must- 
complete QELS that have the same ENQ ID and for which a 
STATUS SVC instruction has been issued. The STATUS SVC 
instruction is issued to establish the must-—complete 
environment; the QELSTAT flag is set in one cf the CELsS 
to indicate that all resources requested have been allo- 
cated and the must-complete environment has keen estak- 
lished as a result of that request. If a message is 
issued to the programmer, a valid recursion flag 
(TCBABCUR = X‘'33') is set during WTO processing; it is 
cleard upon completicn of processing. (See Chart 8.2 
for detailed information on the MCCEL subroutine.) 
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4 For each must-complete resource owned by the current | 


task, the ENQMSG sukroutine is called to flag the CEL as| 
processed (QELABEND), and determine whether the rescurce| 
is critical (using WIOR). The ENQMSG subroutine sets 
the valid recursion flag (TCERARCUR = X‘'36") for WTCR | 
processing, and clears it upon completion of WTOR proc- 
essing. If the resource is considered noncritical, the 
nondispatchakility flags are turned off so that a later | 
entry into the ENQ Manual Purge routine causes the re-_ | 
source to be released. A critical resource is flagged as| 
permanently unavailable, and any tasks with cutstanding | 
requests for that resource are scheduled for abnormal | 
termination using ABTERM. Any tasks requesting unccn-_ | 
ditional use of the resource are abnormally terminated | 
ky the ENO Manual Purge routine. The must-ccmplete en- | 
vironment can be eliminated only if all resources asso- | 
ciated with the request that established the environment | 
are released. Regardless of whether the resource is | 
critical, the MCCEL subroutine is invoked to select the | 
next must-ccmplete QEL with the same ENO ID. If a step | 
resource is queued with the SMC = STEP ofticn, the | 
resource is automatically released and the associated | 
jok step is abnormally terminated. A STEP rescurce | 
does not represent a threat to system integrity. A | 
message is issued to the progrannmer to inform hin that | 
the resource was released. A valid recursion flag | 
(TCBABCUR = X"32') is set during WTO processing and | 
cleared upon return. | 
| 
| 
| 


After all must-complete resources have been defined as 
critical or noncritical, the current task is examined 

to determine whether it still controls any must-complete| 
resources. If yes, any other tasks (except TSO “out-of-| 
core™ users) queued to use the must-complete resource | 
are acheduled for abnormal termination. The rescurce is| 
flagged as unavailable and the Critical Error Phase is 
entered to set the current task's job step permanently 
nondispatchatle. 


| 
| 
| 
The current task could still Le operating in a must- | 
complete state if the task issued its own STATUS SVC in-| 
struction. | 
| 
| 
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| complete] 
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| RESETMC 


| | 
| ISSUEMSG | 
| 
| 


Chart 8-2. MCQEL Subroutine 
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Diagram 8.23 (Steps 1-8) 
ABEND Critical Error Phase 


From ABEND to process a must=-complete or 
critical system task 


Input Processing 
IGCI301C 

CVT Selected TCB 1 If the selected task is not in the same 

CVTHEAD TCBJSTCB job step as the terminating task eS Sa 6 
Current TCB 

TCBJSTCB 

2 Purge resources. Output 

Selected TCB — ——— —— 3 If the failing task owned the Current TCB CVT 






TCBSPVLK supervisor lock 


4 Set the selected task permanently 
nondispatchable if it is not the 


Selected TCB 
current task, STATUS electe 
peal \\\ TCBABWE=1 
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6 Allow GTF to perform cleanup foe | 
processing if a GTF task is failing 
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TCBGTOFM 
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7 Inform the operator that task processing 


was halted. j WTO 
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nondispatchable ea STATUS Current TCB 


renee rane! TCBABWF=1 


(Continued at Step 9) 
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Diagram 8.23 (Steps 1-8) ABEND Critical Error Phase (Module IFAVT¥M03) 
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All tasks on the task priority queue are checked to | 
determine whether they are in the same job stefp as the | 


terminating task. 


The following resources are purged for each task 


selected: 


1. Entries in the type-1 SVC message table 


(MSPURG subroutine). 


2. Paging activity (Termination Interface routine). 
3. Outstanding I/0 activity (Purge I/O routine). 
4. Asynchronous exit queues (PRGQ subroutine). 


5. Outstanding WTOR requests (WTOR Purge routine). 


6. Queued resources (FNO/CEQO routine). 


The valid recursion flag (TCBABCUR = X'E1i") is set 
during the processing of the last five routines. Shculd 
the processing of any routine result in a recursion, 


ABEND is reentered at the following points: 


Routine failing Reentry point 


Termination Interface QUIPGIO 
Purge I/0 QUIPRGO 
PRGOQ subroutine QUIWTOR 
WTOR Purge QUIENOPG 
ENQ/DEQ QUISLKM 


A valid recursion flag (TCBABCUR = X‘Ei') is 


WTO processing. If a failure occurs, ABEND is reentered 


at QUITSCUR (Step 4). 


A valid recursion flag (TCBABCUR = X‘Ei") is 
HOOK processing. If a failure occurs, ABEND 
entered at QUINXTCB (Step 6). 


A valid recursion flag (TCBABCUR = X‘E1i") is 
HOOK processing. If a failure occurs, ABEND 
ed at QUIMSG (Step 7). 


The storage for the message buffer is allocated fror 
subpool 253. Valid recursion flags (TCBABCUR = X‘Ei'") 
are set during GETMAIN/FREEMAIN and WTO processing. 
After issuing the message, the buffer is freed. If a 
failure occurs, ABEND is reentered at QUIMSGF. 
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Diagram 8.23 (Steps 9-16) 
ABEND Critical Error Phase 


Processing 
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invalid recursions 
IGC2301C Output 


















SVRB ESA 


RECCOMPC=0 


10 Set the current SVRB completion 
Input code in the ESA, ACABRARAWABS @ WWE s@aaeae dada caaaaaaAaaaaaaan 


Current TCB ¢4----t-----"- 11s If the current task is in must- 


TCBFSMC complete status Sa 1 
TCBFJMC 









12 Attempt to provide a dump. 


SVCDUMP 
ine IEAVADOO 
8.26 


13 [f the current task is the job- 


step task > | 


b TCB 
14 Turn off flags and schedule the Job-step 













iob step for abnormal termination. LWUBABBRRAELERLERREE SERRE RERRRRRRERE 
Mi. 


Schedule ABEND, 


TCBFOIN P=0 
TCBSTACK=0 


no dump, CC=DO0D 
8.12 





Current TCB 
STATUS 
Bast \ TCBABWF=1 
1GC07902 
3.18 
From the ABEND 


Recursion Phase (8.24) | 45 Exit to the dispatcher. 
to route control ona 
recursion 


Dispatcher (3.17) 


IGC3301C 


Current TCB a a (a a ak 16 Retum to the failing point as 


TCBABCUR indicated by the recursion flag. 


ABEND 





2g UOT }OaS 


66G UoTRzeUTUZAaL 


C 


Diagram 8.23 (Steps 9-16) ABEND Critical Error Phase (Module IEAVIM03) 
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Q If a task switch is necessary, it is performed by the {Critical 
Task Switch routine. Control then passes to the dis- | Error 
patcher to dispatch a new task. |Phase 


Le) 


10 The SVRB cannot be purged because other routines might 
need to refer to it. 


11 Processing for the job step associated with the current 
task is halted if the task is in most-complete status. 
It is not necessary to provide a dump because it was 
attempted in the Must-Complete Phase. 


12 A valid recursion flag (TCBABCUR = X'E1') is set during 
SVCDUMP processing. If the durp failed, a message is 
constructed and sent to the programmer indicating the 
failure. A valid recursion flag (TCBABCUR=X‘'E1') is set 
during WTO processing. The message buffer is freed upon 
issuing the WTO. If SVCDUMP processing results in a 
recursion, ABEND is reentered at INVAFDMP. If WTO 
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e Diagram 8.24 
ABEND Recursion Phase 
From the Initial Housekeeping Phase (8.16) 


to process the recursion and reenter ABEND 
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e Diagram 8.24 ABEND Recursion Phase (Module IFAVTMO0) 
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must-—complete resource was | 
released since it was | 
defined as a step resource | 
instead of a syster | 
resource. | 
| 
WTO processing to inform | 
the progranmer that even (| 
though a task is in must- | 
complete status, there are| 
no more must-complete | 
resources allocated to the| 
task. | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
4 


SVCDUMP processing 
(CRITPURG subroutine). 


WTO processing to inform 
the programmer of the fai- 
lure of a SVCCUMP to pro- 
vide a dump. 


WTO/WTOR processing to 
determine whether a must- 
complete resource is crit- 
ical (ENQMSG subroutine). 


CLOSE processing for user 
data sets. 


WTO processing to inform 
the programmer of the fai- 
lure to close data sets. 


ROUTINE 


Recur- 
sion 
Phase 


c09 


Wye ee ae pe a Ewe Wy Pee ee IE Sy ee et ag ae 5 eee Rae aT 


ROUTINE 


| NAME 


Termination Inter- 
face routine -- 
purge of paging 
activity. 

Purge I/O routine 
-- purge of I/O. 
PRGQ sukroutine -- 
purge of asynchron- 
ous exit queues. 
WTOR Purge routine 
-- purge of WTOR 
requests. 

ENQ/DEQ routine -- 
purge of queued 
resources. 

WTO routine -- 
attempting tc inform 
the operator of a 
task failure while 
owning the super- 
visor lock. 

WTO routine -- 
attempting to inform 
the programmer that 
a task was halted. 
HOOK processing for 
GTF. 


os a 


X'E1* Critical Error Phase Processing connected | 
with one of the | 
following routines | 
failed: 


Recur- 
sion 
Phase 


2g UOT}OeS 


£09 UOT JeUTWUAIL 


Cr 


JIEAVADOO 


SVC 51 issued by 
a SNAP or SDUMP 


macro instruction 


IEAVADO1 


ABDUMP Mainline Processing 
8.27 


1 


Formatting the Header and PSW 
8.28 


e Job name, step name, time, date, user |D, page number. 
e Completion code, 
e PSW, ILC, and interruption code. 





6 


Interface Routine 
8.33 


Provide an interface with the following routines: 
e@ TCAM Formatting. 
e TSO Formatting. 






Build a PIE and PICA. 
Check validity of the DCB. 
Check the job-step level. 


Obtain storage for the dump. 


Suspend GTF if necessary. 
Queue the dump data set if 
necessary. 

Check validity of the TCB. 
Initialize the supervisor 
trace table if required. 
Initialize 1/O. 

Execute user-specified dump 
functions. 

Return to the caller. 


Unconditional 


IEAVADO2 


APFSUPDA on 
JIEAVADO8 





SVCDUMP Routine 


Go immediately to ABDUMP if the caller is not key 0, 
of if ABDUMP is requested. 

Deactivate the supervisor trace. 

Set specified tasks nondispatchable. 

Enable the system. 


Build and sort a list of the storage addresses to be dumped. 
Construct a header for the dump and write it out. 

Dump specified storage area, 

Disable the system. 

Reset tasks that were set nondispatchable. 

Reactivate the supervisor trace. 


Caller 


The user may specify which data areas are to be printed in the 
dump. Each user-specified option is associated with a 
functional routine that performs the necessary processing. 
Fields in the ABDUMP work area (ABDAREA) indicate which 
functional routine should gain control; the Mainline routine 
then passes control to the functional routine by a BALR 
instruction. The functional routines gain control in the 

order specified by the numbers; processing consists of 
formatting (if necessary) and printing the data areas indicated. 
All routines are given control with the following registers set: 


1 -- Address of ABDAREA 
13 -- Address of the save area 
14 -- Return address 
15 -- Entry -point address 


All functional routines return to the ABDUMP Mainline routine. 





APFSUPDA on 
2! IEAVADO3 


TCBs. 

RBs. 

LLEs. 

CDEs and extent lists. 
DEBs. 


TIOT and associated DD entries. 


Formatting Control Blocks | 
8.29 


Diagram 8.25 


Overview of the SVCDUMP 
and ABDUMP Routines 


Se ee rane See ean eae ee ea ee ee — ——----——--—-——--—4 


TieAvA D81 IEAVAD11 IEAVAD71 


PRINT Routine OUTPUT Routine FORMET Routine 
8.38 8.38 8.4] 


e Provide an interface to the OUTPUT e@ Print blocks of storage. 


‘e Print lines of the dump on an output 


device. 


routine from subsystem modules. 





Caller 


IEAVAD41 IEAVAD31 IEAVADS1 


FORMATO1 Routine FORMAT Routine FORMATZ20 Routine 
8.39 8.39 8.40 


e@ Unpack and translate data in the 
print line, providing an indentation 


e Unpack and translate data in the e Translate data in the print line. 


print line, without providing an 
indentation factor. 


factor. 





Caller 


IEAVAD21 IEAVAD61 


FORMATZ22 Routine 
8.38 8.38 
e Print lines remaining in the buffer 


after ABDUMP processing has 
completed. 


OUTPUTS Routine 


The enclosed routines are the ABDUMP e@ Unpack and translate data in the 


printing routines. They are called by 
the functional routines shown below, or 
by ABDUMP Mainline processing. 
These routines perform the actual 
printing onto the output devices. 


print line. 








Caller 


fa en hy pee a ee ee cil 









APFSUPDA on APFQCB on APFSAVE on 
3 IEAVADO5 4 IEAVAD06 5 IEAVADO7 
Formatting Control Blocks || Displaying the Save Area 





e IQEs and SQEs. 
e SPQEs, DQEs, and FQEs. 
e@ PQEs and FBQEs. 


e Major QCBs. e@ Heading for the save area trace. 
e Minor QCBs, Contents of the problem-program save area associated 
e QELs. with each IRB. 


Valid save areas. 
The two most recent save areas associated with the most 
recent PRB. 





APFREGS, APFSNAP, 


APFNUC on 
7 IEAVADOA 


Displaying the Nucleus 
8.34 


e Nucleus heading 
Nucleus, exclusive of the 
supervisor trace table. 


LSQA 


SQA 
Active SVC modules. 


APFJPA, APFLPA on 
8 IEAVADOB 


9 
Displaying Registers 
8.35 8.36 


e Register contents. 
e Storage described by the snapshot list. 
e Active JPA and LPA modules. 





IEAVADOC 10 jEAVADoD 


Displaying Subpools 
8.37 
e Allocated portions of subpool 252. 
e User subpools. 


Formatting Trace Data 


e@ Trace table entries. 
e@ Load GTF Formatting module |GCOFOSA, 
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From SVC SLIH (2,3) (after an SVC 
51 has been issued by a SNAP or 
SDUMP macro) to build a dump 





dataset 


Input 


Register |} Register 3 


Address of Address of CVT 
parameter list 


Register 4 Register 5 


Address of TCB Address of SVRB | 
| 


Parameter List | 


ae 
| 
| 


| 

| 

L 
4 


Parameter List 


Ye ais 
a3 ae 
| Sera a 
Pret iden 


Dump all (SQA, 
SWA, LPA, 
RGN, LSQA, 
NUC). 

Omit SQA, 
Omit NUC. 
Omit RGN & 
LSQA, 

Omit LPA. 
Omit SWA, 
DCB not pro- 
vided by the 
caller; use 
SYS1, DUMP. 
Use the TCB 
address in this 
list instead of 
register 4, 

Set all tasks 
nondispatchable 
for console Parameter List 
dump. PFS ae 
1: SVCDUMP SS le 
0: ABDUMP 


ae ata SA 


| 

| 

I 

Ea 
Spe ee 


TCBLSQA 
“a 


% yt bm = may 


se te Maat 


“RP eae RI 
See Le a re 
a See Pees 


© 


DCB address 
L 3 


ae 
~D Se “ay 4 


eee 





Processing 


IEAVADOO 


oh, 


If caller's key is not 0, or if SNAP 
is requested 


2 |f SVCDUMP is in progress 


3 Deactivate the supervisor trace and 
indicate SVCDUMP in progress. 


4G For console dumps, set all tasks below 
the master scheduler nondispatchable. 


For all other dumps, set nondispatchable 
only those tasks sharing the same LSQA 
as the specified task. 


5 Enable the system to avoid disabled 
missing page interruptions, 


6 If there is no valid dump data set 


(Continued at Step 7) 


ABDUMP (8,27) 


Caller via SVC 3 


ANNNANN 







| STATUS | 
iM: 
3.18 


| MO DESET 


IEAMODBR 
3.21 


Caller via SVC 3 








NAAAANANANANA 


Diagram 8.26 (Steps 1-6) 
SVCDUMP Routine 





ce os ~— 4 + gees 
CVTTRACE=NOP instruction 
Rear oS 
CVTSDTRC=] 
Uy n “Stake a 





+ ee. * aie Sl ow 
TCBDAR=] 

$0 * 4 ~ e P55 
Register 15 


Return codes: 

DCB not open or invalid = X'04' 

Device not supported = X'0C' 

Dump data set full -- no dump 
taken = X'14! 

Permanent |/O error, or device 
not available = X'1C' 

Permanent 1/O error, or too 
many addresses specified 
(partial dump) = X'20' 

Unit exception on dump to 
tape = X'24! 


g uotzOaS 


uotzeuTwAzaL =: 
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Diagram 8.26 (Steps 1-6) SVCDUMP Routine (Module IEAVADOO) 


[A oe eye TE tet we PG ar ee Sm he pas ea ee 1 oS tae ee ea ee a 


| 

| NOTES | 

| Before referencing the parameter list, it is checked to 
determine whether it is in real storage. If it is nct, 
to avoid paging errors, MOLDESET is called to enakle the 
system. The parameter list is referenced to have it 
paged in; MODESET is called again to disable the system. 


1 RBOPSW contains the caller's key. Only key 0 callers 
can use SVCDUMP; all others must use ABDUMP. 


[ 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| 2 CVTDMPLK, when set, means that SVCDUMP is in progress. | 
| | 
| 3 CVTSDTRC is set to indicate that SVCDUMP has deactivated| 
| the trace. CVTTRACE ccntains a branch instruction; to | 
| deactivate the trace, a NOP instruction is inserted. | 
| TCBDAR, when set, means that SVCDUMP is in progress for | 
| this TCB. | 
| | 
| 4 If Flag 2 indicates a console dump, CDNAME is checked. | 
| It must contain "IFE60110" to prove that the caller is | 
| the Console Dump routine. | 
| [ 
| [ 
| | 
| The dump data set is invalid under these conditions: | 
| [ 
| e Tt cannot be fcund. | 
| | 
| e It is not located on a tape device nor a sufrorted | 
| direct access device (SVCDUMP does not support | 
| devices 2302, 2303, 2311, cr 2321). | 
| | 
| e The device is offline . | 
| | 
| | 
| | 
| | 
L 1 


e The data set is nct open. 


e® The data set is full. 


ROUTINE 
NAME . 


| 
| LABEL 


DMPSNAPP 


DMPTLSQA 


7 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 

DMPDCBLK | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 

d 


ee ee oe ee ee 
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Diagram 8.26 (Steps 7-12) 
SVCDUMP Routine 


Input Processing Output 


Parameter List (or 7 Determine the kind of dump requested SVCDUMP internal 
and put the addresses for areas sort table 
requested to be dumped in the sort 


fFlag1 = —_— table. te 


Address of storage list 


Register 15 


If no valid dump type is specified ee Return code = X'18' 


Caller via SVC 3 


SVCDUMP Internal 
Sort Table 


User's storage list 





8 Sort the addresses of areas to be dumped 
in ascending order, eliminating overlaps. 


9 Construct a header record and write it 
out. 


CVT 


CVTGTRCE — 


10 Construct a dump record, and write it 
out. Repeat until all storage areas net 
specified in the sort table are dumped. 

IEAMODBR 
(Disable after writing 
each record.) 





3.21 


(Storage areas not in real storage must 


be paged in.) EE 


|EAPFP2 
3.27 


MODESET 
Original branch 
IEAMO DBR instruction 
(Enable for paging.) 


3.2] 


11° Reset tasks set nondispatchable in Step 4. STATUS CVT CR 


1GCO7902 48 
3.18 CVTTRACE TCBDAR=0 
CVT DMPLK=0 


|cvtsptrc-0 | — Register 15 
| Return code = X'0Q0' | 


- 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Dx 





——-112 Reactivate the supervisor trace and turn 
off SVC DUMP indicators. 











Caller via SVC 3 


2g UOTZOSS 


UOTRZeU TIL 
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Diagram 8.26 (Steps 7-12) SVCDUMP Routine (Module IEAVADOO) 


CS a eee ee eS se SS esses 525==55= 7-=-+=- += FHS = 55> 1 
| |ROUTINE | | 
| NOTES | NAME | LABEL | 
Sah RN a oP AS ase ee hh he ee ee Ree 4—-~----— 
| 7 At least one of these conditions must specify the dump |SVCCUMP |CMPINIT | 
| type: | | CMPCKPL | 
| | [ 
| e “Dump-all-storage™ request (see the parameter list | | | 
| inset) | | | 
| ae | | | 
| e Storage list address is not 0, but it points toa | | | 
| list of addresses to be dumped | | | 
| { | | 
{ e TCB is specified in the parameter list | | | 
| | | | 
| 8 Once the STATUS routine has been entered to set tasks | | CMPSORT | 
| nondispatchable, any error exit must first reset tasks | | | 
| dispatchable for normal completion. | | | 
| | | | 
| 9g | | CMPSETHD | 
| | | | 
110 | | CMPALCINC | 
| | | 
111 | | CMPERET | 
| | | | 
112 If CVTGTRCE=1, GTF has set the supervisor trace | | | 
| nondispatchable. In this case, CVTTRACE is not reset. | { | 
bat Se Se et SE a eS a Peck ones Darina rat a ee eee 4 
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Entry from the SVCDUMP routine (8.26) 


to prepare for a dump 
Input 
; +-— 


Register | 
Address of parameter list 


aa 
[ 
L ee eee 
Address of CVT 


ro] Zz 
a 2 

a 
— me 
a ww 
4 2 
© o 
x x 


Address of caller's TCB 


Address of ABDUMP SVRB 


~~ 
a. 
¢. 
© 
= 
nn 


Caller's Parameter List q— ——= —_— 
YESSVCDP 


r 
| 


DCBBLKSI —_— — 
DCBOFOPN 

DCBDSGPS 

DCBRECFM 

DCBLRECL 

DCBMACRF i: 





Current TCB ————— ee I 


TCBLTC 


TCBJSTCA 


9) 


VT ABDAREA cs 


CVIGTFS APFABEND —- 


CVTFORM APFTRACE 


Current TCB 


TCBGTOFM 


Processing 
JIEAVADO1 


1 Obtain storage and build a PIE and 
PICA in subpool 253, 


2 Enable the system for interruptions. 


3 If this request is for SVCDUMP 


A Check validity of the DCB specified 


in the caller's parameter list. 


5 Check the job-step level. 


6 Obtain storage for the dump. 
(See Diagram 8.27, Step 13 on 
Storage Allocation.) 


7 Suspend the GTF trace if necessary, 
and queve the data set if required, 


(Continued at Step 8) 





Diagram 8.27 (Steps 1-7) 
ABDUMP Mainline Processing 


Output 


Register 15 


Return code=X'08' 


No Storage 
Caller via SVC 3 


| MODESET | DESET 


1GC107 
3,21 


Register 15 


Return code=X'08' 


Register 15 
Return codes: 

: Data set no open=X'04! 
Invalid DCB not provided=X'04' 
Caller via SVC 3 Invalid DCB address=X'04' 

Invalid parameter=X'0C' 


Caller via SVC 3 





Register 15 


Return code-X'08' 


Subtask is a job-step 
task 
Caller via SVC 3 


Register 15 


Return code=X'08' 


No Storage 
Caller via SVC 3 


| HOOK 


EID=|EAABOF 


ABDAREA 


ENQ parameter list 

Major name (qname) = 
SY SIEAO1 

Minor name (rname) = 
DCB address 





2g uot 3DaeS 


uoTzeUTWO L 
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Diagram 8.27 (Steps 1-7) ABCUMP Mainline Processing 
PSS 486 Sa a a a a ae ea ee aera ee eee eae 2 Sac aaRERnEeas 
| 


| NOTES 


If storage is allocated, a PIE, which rfoints to a FICA, 
is built. The PICA accefts only protection frogram 
interruptions (code 4). INITX1 is specified as the 
ABDUMP exit routine; this routine gains control if an 
invalid missing page interrruption (a page that is unas- 


Signed is referred to) occurs. The RBUPR flag in the RB 


is set to 1 to indicate that a PIE exists. 
The DCB is valid if the following values are specified: 
DCBOFOPN 


DCBDSGPS 
DCCBRECFM 


1 (CCB open). 

1 (physical sequential organizaticn). 
X'S4" (variable ktlocked format with 
ASCII control characters). 

125 (logical record length). 

882 or 1632 (blicck size). 

X'0020" (data set open for BSAM Writes). 


¢ DCBLRECL 
e DCBBLKSI 
DCBMACRF 


If an invalid missing page interruption occurs during 
the validity check of the CCE, the exit routine INITX1 
is called to restore registers 14-2 from the PIE. For 
an invalid missing page interruption, or any other inva- 
lid DCB condition, all storage acquired is freed hefore 
passing control to the caller. 


Because processing is limited to tasks that do nct have 
job-step tasks as their descendants, a test is made 
(while the system is disabled) tc ensure that the cur- 
rent task does not have a suktask that is also a job- 
step task. If no such subtasks exist, asynchroncus 
exits (TCBFX=1) and invalid missing page interruption 
processing (RBUPR=0) are prohibited. Processing con- 
tinues with the allocation of storage for the dump. 


It ABEND is not the caller, and the user-requested 
trace data is displayed, tests are made to determwine 
whether GTF is active in the system (CVTGTFS), and 
whether “in-core™ tracing (CVTFORM) has keen specified. 
If so, tracing is suspended now if not done earlier. 

If ABEND is not the caller, an ENQ parameter list is 
built, and an exclusive ENQ macro instruction is issued 
for the data set. 


(Module IFAVADO1) 


ROUTINE 


| NAME 


IEAVADO1 


pei a a a a a a es es 


+——4 


LABEL 


—_a 


OT9 


Input 


ABDAREA SS 
APFTCB 
ABDCTCB 
ABDPTCBP 


ABDAREA CVT 


APFTRACE CVIGTFS 
CVTTRACE 


ABDAREA q+ —_— — —_ — 


[_ 


ABDAREA 


APFTRACE 
ABDGTFLG 





ABDCPFIX 





















Processing 


8 Check validity of the TCB that 
has been provided, 


Initialize the supervisor trace 
table if requested. 


Initialize |/O. (See Diagram 
8.27, Step 18 on I/O 
Initialization.) 


Execute user-specified dump functions, 
(See Diagrams 8.28 - 8.37 for details.) 


Free storage and return to tne caller, 

















VALCHECK 


Search for TCB of 
task to be dumped. 


BABAR RRREEEEGEEREEEE 









Invalid 
Caller via SVC 3 


No trace available 


or no storage 


Normal completion 


Caller via SVC 3 





FREEMAIN 
IGCO10 








6.] 


Incomplete dump 
Caller via SVC 3 


Diagram 8.27 (Steps 8-12) 
ABDUMP Mainline Processing 


Output 


Register 15 


Return code=X'04' 


ABDAREA 


ABDCPFIX=1 


Register 15 


Return code=X'00' 


Register 15 


Return code=X'08' 


Attempts to print message: 
"DUMP TRUNCATED FOR 
INSUFFICIENT STORAGE" 





2g UOT RIDES 


TI9 UuoTZeUTUZAY 


Diagram 8.27 


co 


Under the following circumstances, the dump is ccnsid- 
ered to be that of the current task; further checking 
of the TCB is bypassed: 


e User did not specify to dung another task. 

e User-specified dump is not of the current task, but 
the TCB address (ABDPTCBP) is set to 0 or to the 
address of the current task's TCB (ABDCTCB). 


The address cf the TCB for the task to be dumped 
(ABDTCB) is set to the address of the current task'‘'s 
TCB (ABLCCTCB), and execution continues with the initial- 
ization of the supervisor trace table (Step 9). If the 
current task is not reing dumped, a check is made to 
ensure that the task to be dumped is in the same jok 
step as the task which requested the dump. Before 
checking the TCB address supplied by the user, all 

tasks in the job step except the current task are set 
nondispatchable. If the VALCHECK subroutine indicates 
a valid TCB, the ABDTCE field is set to the address of 
the user-supplied TCE (ABDPTCBP). Execution continues 
with Step 9. If the TCB address is invalid, a HOOK 
Macro instruction is issued to restart GTF (if suspend- 
ed earlier). The jot step is set diSpatchable (using 
STATUS), and the dump data set is dequeued if necessary. 
After freeing storage, return is made to the caller. 


If a supervisor trace table dung has been requested, an 


attempt is made to acquire storage (from subpool 252) in 


which to move the table. If storage is allocated, the 
beginning (ABDFP) and ending (ABDLP) addresses of the 
buffer are saved in ABDAREA. The current trace takle 
entry is found by adding the displacement from the 
beginning of the table to the initial address of the 
buffer. This address is placed in ABDCP1. The trace 
table is moved, and the current trace takle entry is 
found as previously. This new address is stored in 
ABDCP. The addresses of the two entries are used later 
by the Formatting Trace Data routine (IEAVADOC). The 
entries existing between ABDCP1 and ABDCP are ignored 
because they cccurred during the time the trace table 
was being moved. If nce trace is available, cr there is 
insufficient storage, IEAVADOC prints the message: 
"TRACE NOT AVAILABLE. *® 


Note: The trace table dump is provided cnly in a SNAP 


ee we es a ae ee a a ee ee ee 


(Steps 8-12) ABDUMP Mainline Processing (Module IEAVADO1) 
(Se ee eee ee ee | See cae 
| 


ROUTINE 


NOENCG 
DCUMPCUR 


FREEPIE 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
EXIT1 =| 
| 
| 
VALIDTCB | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


-—— — — Ee EE 


a aA a aa a a Ra UO aa Re TOT PON See eT tes a] 


| 
NCTES | 
11 The functional areaS are given control in the order 
described in Diagram 8.25. 


12 If a failure occurred EFefore IFAVADOC was invoked, 
ABDUMP Mainline must perform two checks: 


*« If GTF was suspended earlier (ABDGTFLG), it must Le 
restarted Ey issuing the HOOK macro instruction. 

e Otherwise, if a trace table buffer was cktained 
(ABCCPFIX), it is freed. 


If a failure occurred in IEAVALCOC processing, the return 
code indicates whether cleanup processing is required 
or was performed by LEAVADOC. 


If the dump has been completed without errcer, the "END 
OF DUMP” message iS rfrinted and the contents of the 
blocking buffers are written cut. The jcb step is set 
dispatchable, if necessary, and a DEQ macro instruction 
is issued if the ENQ macro instruction was issued 
earlier. The follcwing storage areas are freed: 
blocking buffers, save areas, ABDAREA, and PIE/PICA 
storage. 


Note: The kEuffers are printed Fy the OUTPUT (IEAVAD11) 
and OUTPUT5 (IEAVAD21) routines. 


ee ee a a wt ew i ew ww ee wo ee ee 


ROUTINE | 
NAME | LABEL 


TRACELN 


EXIT2A 
EXIT1 


FREEAREA 
FREEPIE 


ln ey mm se ee ge ee ke 


cT9 


Input 


ABDUMP Parameter List 


DCB 


DCBDEVT 





Expansion of Step 6b -- Storage Processing 


Allocation From Diagram 8.27, 
Step 5 


13 
14 
ae i i 


16 


17 


Expansion of Step 10b -- I/O 
Initialtzation From Diagram 
8.27, Step 9 


18 


20 


21 


22 


23 


Allocate storage (from subpool 253) 
for ABDAREA and a register save area 
for ABDUMP Mainline processing. 


Initialize all flags and switch cells 
by clearing ABDAREA to 0, 


Move the ABDUMP parameter list 
from user storage into ABDAREA; 
initialize ABDAREA. 


Acquire storage for a DECB and a 
register save area from subpool 250. 


Place the address of the Mainexit 
routine in the PICA, and set the 
RBUPR field. 


Initialize the DECB to point to the 
DCB specified by the caller, 


If the device is not a printer 


Set DCBSYNAD to point to a BR 14 
instruction located in ABDUMP 
Mainline code. 


If storage cannot be obtained by 
issuing a variable conditional 
GETMAIN request 


Initialize output buffers. 


Initialize ABDAREA control fields. 


Diagram 8.27 (Steps 13-23) 
ABDUMP Mainline Processing 


Output 
a4 1GC004 
SVRB ESA 


6.1 
Address of ABDAREA 
Register 13 





Address of save area 


ABDAREA 
ABDTCB 
ABDCTCB 
ABDCRB 
ABDPARMS 


GETMAIN 


IGC004 
6.1 


ABDAREA 
ABDDECB 
ABDSAVE 


ABDUMP SVRB 
RBBB RERRRREREREEEEE EERE RBUPR=1 


D> 7 





ABDAREA 
ABDDCB 





> 2 | 


12 
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ABDAREA 


> ABDPTRSI 


ABDPTRS2 
ABDPTRS3 
ABDAREA 
eee CABDPHY 
ABDCC 
ay 11 ABDLINE 
ABDLCTR 
ABDPCTR 
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Diagram 8.27 (Steps 13-23) ABDUMP Mainline Processing (Module IEAVADO01) 


ae ee a Se oe ae ee eee pe i ee eg 8 Da CSCS ee No QRS gan es ee ee Ee eee eS ea Ea a ee eo ea 5 aad Caen ia some arco 1 
l | ROUTINE | | | [ROUTINE | | 
| NOTES [NAME [LABEL | | NOTES | NAME [LABEL | 
} —----------- ---------- = -- ---- = $= === nn en nnn nnn nnn nn nnn t-------- eee {  |-=--------------------------------+------------------------- +-------- $-------- { 
| Storage Allocation | | | | I40 Initialization | | | 
us rere | 118 | LEAVADO1| DONETRCE | 
115 The ABLUMP parameter list is moved into the ABDUMP work | | | (19 The dump can be printed (one line at a time) ona | | 
| area (ABDAREA) to enable the list to be examrined with- | | | | printer, or written (as a block of storage) on tape cr | | | 
| out encountering missing page interruptions. | | | | a direct access device. If the device type field | | | 
| The foliowing fields are initialized: | | | (DCBDEVT) contains X‘'48', the device is a printer. | | | 
| | | | 
| ABDTCB = address of TCB dunped | | | [20 By cointing to a BR 14 instruction, print errors are | | 
| ABDCTCB = address cf current TCB | | | | ignored and the dump continues, with output unklcocked. | | | 
| ABDCRB = address of ABDUMP SVRB | | | | | | | 
| ABDPARMS = ABDUMP farameter list { | | [24 The GETMAIN macro instruction is issued for a minirur | | | 
| | | | | of 256 bytes or a maximum indicated by the DCBBEKSI | | | 
116 The save area is later used Fy the OUTPUT (IFAVAD11) | | | | field. | | | 
| subroutine. If the storage cannct be allocated, all | | | | | | | 
| storage obtained earlier must Le freed. | | | |22 The output buffer pointers are initialized tc the | | | 
| | | | | following values: | | | 
1147 The exit routine INITX1 is replaced with the Mainexit | | | | | | | 
| routine. The RBUPR field is set to 1 to indicate that | | | | ABCPTRS1 = initial L-uffer address | | | 
| the Mainexit routine gains control when an invalid mis- | | | | ABDPTRS2 = next available buffer address | | | 
| sing page interrupticn occurs. The Mainexit routine | | } | ABDPTRS3 = end of kuffer + 1 | | | 
| issues an SVC 13 instruction to pass control to ABEND | | | | | | | 
| (with a X'0C4' completion code) if an exit rcutine was | | | 123 The ABLAREA control fields are initialized to the | | SETRECLG | 
| not specified. If an exit routine to handle invalid | | | | following values: | | | 
| missing page interrugtions was specified (in field | | | | | | | 
| ABDUPRXT), this routine is given control. | | i | ABDPHY (record length) = 129 | | | 
t----~---------~-----------------— -------------------------=-=-- 1-------- Sasso e= J | ABDCC (ASCII contrel character) = blank | | | 
| ABDLINE (print line) = blank | | | 
| ABDLCTR (line count) = 1 | | | 
| ABDPCTR (page count) = 1 | | | 
ce a a as ee ea 5 a ee ee eee cee J 
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Diagram 8.28 


ABDUMP— 
From ABDUMP Mainline processing (8.27, Formatting the Header and PSW 
Step 11) to print the header and PSW 
Input Processing Output 
The format of a VS2 dump 
EAD is shown in the OS/VS2 


Debugging Guide, GC28- 


Obtain storage for a register save area GETMAIN 0632. 
from subpool 253. 


ABDUMP Mainline 
(8.27) Step 11 


6.1 


No storage 





TIOCNJOB 


i 2 Format the job name and step name 
TIOCSTEP from entries in the TIOT. 
3 Format the time and date. 
ABDAREA Determine time and 
APFID A date. sd 


ABDPID 





Format the user ID (if supplied) into 
the output line. 


Format and display the completion 
code. 


ABDAREA 


RB 
APFPSW RBOPSW 
APFABEND RBINLTH 


9 Free the register save area and return 
eITEOP control to ABDUMP Mainline processing. 


8 Format and display the PSW, ILC, 
and the interruption code (line 3). 


5 Format the page number, 
6 Display the header line (line 1). 1 | 
TCB ABDAREA 
TCBCMPC APFABEND i 7 


FREEMAIN 


1GC005 






6.1 





ABDUMP Mainline 
(8.27) Step 11 
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Diagram 8.28 ABDUMP -- Formatting the Header and PSW (Module IEAVADO02) 
a ma aa a aaa aaa aa a am a a =. -— ~t 
|ROUTINE | 
| NOTES | NAME | 
aan 2-7-5252 5 $22 $55 nn 2-2-5 - 2 === === +-------- +-------- 
| If the GETMAIN request fails, control returns to ABDUMP |IEAVADO2| 
| Mainline processing with a return code of X‘04*. | | 
| | | 
| The TIME macro instruction is issued to obtain the | | 
| correct time and date. | | 
| | | 
| The page number (found in field PAGEMSG) is initialized | | 
| to c*o0dgo1'. | | 
| | | 
| If ABEND is the caller (APFABEND=0), the completion code| | 
| is formatted and displayed. If the system completion | | 
| code is not 0, it is used; otherwise the user code is | | 
| displayed. No completion code is displayed if the dumre | | 
| is not an aknormal (ABEND) dump. | | 
| | | 
| The APFPSW field, if set, indicates that the PSW, ILC | | 
| (interruption length code), and interruption code are | | 
| formatted and displayed from the RB of the task in con- | | 
| trol at the time of the SNAP or ABEND (APFAREND). | | 
| | | 
| A return code is passed in register 15: | | 
| | | 
| X'00* - successful completion | | 
| X*'O4" - insufficient storage for the dump, or a fail- | | 
| ure in an ABDUMP print routine | | 
| | | 
| The following ABDUMP frint rcutines are called: | | 
| | | 
| e FORMAT (IEAVAD31) | | 
| Unpacks and translates data in the print line, | | 
| providing an indentation factor. | | 
| Called to execute Steps 3, 7, and 8. | | 
| © OUTPUT (IEAVAD11) | | 
| Prints lines of the dump on an output device. | | 
| Called to execute Steps 6, 7, and 8. | | 
| | | 
| Should either ABDUMP frint routine fail (return code #_ | | 
| X‘00"), control passes to cleanup processing (Step 9). | | 
| | | 
| Note: The appropriate label precedes each field. For | | 
| example: | | 
| | | 
| JOB jobname STEP stepnane | | 
US oes ee a a oe a ee ee eee ee eee Pe oe eL rf 
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Diagram 8.29 
ABDUMP— 
Formatting Control Blocks | 


From ABDUMP Mainline processing (8.27, 
Step 11) to print control blocks 





Processing Output 
IEAVADO3 
The format of the VS2 dump 
1 Obtain storage for a register save area ; GETMAIN ed row ie the: O27 Nee ab 
from subpool 253 me Debugging Guide, GC28- 
om subp ; 
Input IGC004 0632. 
6.1 
ABDAREA Sa No storage 


8.27) Step 11 
ABDCTCB (8.27) Step 


ABDTCB LL — — — — — +} —- — — — — 2 Format and display the TCB. ABDUMP Mainline 









Ba i the fake haw Gompletedsexecution > 5 
4 Locate the RB; format and display 
RB according to type (TIRB, IRB, SVRB, 
RBLINKB Locate next RB to 
be displayed. 
LLE If entry from Step 3 
LLECHN 5 Format and display LLEs. > 7 


Format and display CDEs and extent 
lists. 










FINDRB 
Locate next RB to 
be displayed. 

CDXLPT 


Display CDEs and 
extent lists . 






LLE 
LLECDPTA 


o 


TCB EB 

DEBLNGTH 
DEBDEBB 
DEBAPPAD 

TCB TIOT 

TCBTIO TIOELNGH 

TIOEDDNM 
TIOPROC 


TIOCNJOB 9 Free the register save area and return 


TIOCSTEP contro] to ABDUMP Mainline processing. FREEMAIN 


IGCO05 


7 Format and display DEBs. 


FIC 


8 Format and display the TIOT and 
associated DD entries. 


6.1 


ABDUMP Mainline 
(8.27) Step 11 
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Diagram 8.29 ABDUMP -- Formatting Ccntrel Blocks I (Mcdule 


2 


A return code of X'04" is passed if storage is not 
available. 


The TCB is formatted and displayed in three sections: 


e Start of the TCB to the start of the TCE register 
save area. 

e TCB register save area -- this section is displayed 
only if the TCB to ke displayed (ABDTCB) is not the 
current TCB (ABDCTCB). 

e End of the TCB register save area to the end of the 
TCB. 


The FINDRB subroutine is entered to find the previous 
RB on the task queue. The RB at the beginning of the 
queue, the oldest RB, is displayed first. The last RB 
Flaced on the task queue, the youngest, is displayed 
last. 


The LLES are displayed three to a line in the order in 
which they appear cn the task queue. 


The FINDRB subroutine is invoked to locate CDEs 
associated with RBs. The CDEs are formatted and dis- 
played in the same order as the RBs. After the RB 
queue has been exhausted, any reraining CDEs asscciated 
with LLEs are formatted and displayed. Upon completion, 
the extent lists associated with CDEs are formatted and 
displayed in the same order as the CDEs. 


The DEBs are formatted and displayed in the crder in 
which they appear cn the task queue. The DEB I/C AVT 
(appendage vector table) is displayed in a separate 
block if it does nct appear in front of the DEB. 
Because the system is enabled for interrupticns during 
formatting and display processing, an exit is estab- 
lished in the FORMET routine (IEAVAD71) to handle ris- 
sing pages due to DEBs freed during I/O operations. 
Because the DEB pointer can be changed during I/C, a 
count is kept of the numker of CEBs that have been dis- 
played. The DEB queve is searched while the system is 
disabled. If the exit is taken, a message is printed 
stating that storage is invalid; the dump is not 
truncated. 


a a a a a a a a a a ae a ee ee 


IEAVADO3) 


LLEOUT 


CLCEOUT 
GETRB 
LLECDE 


foo ro - ne 


8 The fixed portion of the TIOT is formatted and dispflay- 
ed first. The DD entries (beginning with the first 
byte after the fixed portion) are then formatted and 
displayed. This processing continues until the null 
entry is found. 


co 


A return code is passed in register 15: 


X'00" - successful completion. 
X'O4* - insufficient storage fcr the dump, or a frail- 
ure in an ABDUMP print routine. 


The following ABDUMP print routines are called: 


e FORMAT (IEAVAD31) 
Unpacks and translates data in the frint line, 
providing an indentation factor. 
Called to execute Sters 2, 4, 5, and 6. 

e FORMAT22 (IEAVAD61) 
Unpacks and translates data in the print line. 
Called to execute Steps 4, 6, and 8. 

® FORMET (IEAVAD71) 
Prints Elock of storage. 
Called to execute Step 7. 

* OUTPUT (IEAVAD11) 
Prints lines cf the dumg cn the outyut device. 
Called to execute Steps 2, 4, 5, 6, 7, and 8. 


Should any of the ABCUMP print routines fail (return 
code # X'00‘'), contrcl passes to cleanup processing 
(Step 9). 


Note: The appropriate label precedes each field. 


a a a es a ea a a SS 


a 
|ROUTIN 
| NAME 


E 
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From ABDUMP Mainline processing (8.27, 
Step 11) to print supervisor data 


Input Processing 
|IEAVADO5 
ABDAREA Fixed Low Core 
ABDTCB FLCAEQ J 1 > Obtain storage from subpool 253 for a 
register save area, 


FLCAEQS 


ENE 2 Format and display IQEs and SQEs. 
IQETCB 
IQEPURGE 


SQE 


SQETCBA 
SQEVLNG 





TCB 


3 If the task has completed execution 


ABDAREA 
ABDCTCB 4 Set TCB nondispatchability flags. 
TCB 
TCBMSS 
TCBFLAG 
TCBISTSK 5 ee and display SPQEs, DQEs, and 


TCBOTC SPSHARE 6 Turn off the TCB nondispatchability flag 


TCBJSTCB if the current task is betng dumped. 


FQE 
FQEPTRA 
FOERCNEE 7 Format and display PQEs and FBQEs. 


8 Free the register save area and return 





ABDAREA <q —_ —_— —_——_— 
ABDCTCB 


DPQE 


FBOE 


PQE 
PQEFFBQE FWDPTR 


TCBPQE 





PQEFPQE 





control to ABDUMP Mainline processing. 


Diagram 8.30 
ABDUMP— 
Formatting Control Blocks I! 


Output 


The format of the VS2 dump is 
shown in the OS/VS2 
Debugging Guide, GC28-0632. 
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, 1GC004 


6.1 








No storage 


ABDUMP Mainline (8.27) 
Step 11 
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TCB issuing SNAP 
PCAN A AAANN Parc R ERE ETE 
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TCB issuing SNAP 
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Diagram 8.30 ABDUMP -~- Formatting Control Blocks II (Module sila 


1 


A return code of X'04° is passed if storage is nct 
availacle. 


The IQEs and SQEs are formatted and displayed in the 

Same manner; the ICES are processed first. After the 
IQE queue has been exhausted (the high-order byte in 

the last ICE contains an X‘FF'), the loop is initial- 
ized for the SQE search. 

Under the following conditions, the IQE/SQE is formatt- 
ed and displayed: 


e The purge flag (IQEPURGE/SCEPURGE) is on ~~ the 
element is not freed until it has been displayed. 

e The TCB address associated with the element 
(IQETCB/SQETCBA) is identical to the TCB address of 
the task being displayed (ABLDTCB). 


If either of these conditions does not exist the 
IQE/SQE is ignored, and the search continues for the 
next IQE/SQE. 


Note: The search occurs in the disabled state with the 
system enabled. The formatting and displaying occurs 
with the system enabled. 





If the current task is being dumped, all tasks in the 
job step (except the current task) are set ncndispatch- 
able. This is done to ensure the reliability of the 
virtual storage supervision (VSS) control blccks. 


The virtual storage supervision control Elocks are 
formatted and displayed in the order: SPQE, DQE, FCE. 
If the subpool is shared, the shared and owner SFQEs 
and their associated DQEs and FCEs are formatted and 
displayed if one of the follcwing conditions exists: 


e The task being dumped is not a key 0 nor a TSO task. 
e The owner SPQE is under a tasSk within the jok step 
of the task being dumped. 


IQEDISLP 


VMMOUT 


NEXTS PQE 
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T 
{ROUTINE { 
| NAME [LABEL { 


}------------------------------------------------------------ $-------- $-------- { 


se ee ee ee 
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oc 


The dummy PQE is first formatted and displayed. Then 
the PQE and the associated FEQE are processed. If the 
FBQE address is identical to the PQE, the end of the 
FBQE queue has been reached and the next PQE is search- 
ed. 


A return code iS passed in register 15: 
X*O00* -— successful completion. 


X'O4* - insufficient storage for the dumr, 
failure in an ABDUMP print routine. 


ora 


The following ABCUMP print routines are called: 


FORMAT22 (IEAVAD61) 
Unpacks and translates data in the frint 
Called to execute Step 5. 

FORMAT (IEAVAD31) 
Unpacks and translates data in the print line, 
providing an indentation factor. 
Called to execute Steps 2 and 7. 

OUTPUT (TEAVAD11) 
Prints line of the dump on an output device. 
Called to execute Steps 2, 5, and 7. 


line. 


Should any of the ABDUMP print routines fail (return 
code # ‘00°), control passes to cleanup processing 
(Step 8). 


The appropriate label precedes each field. 


| LEAVADO5 | DISPACHK | 


| PQFOUT 
| NEXTPOF 
| GETFBQE 


FREERET 


| 
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Diagram 8.31 
ABDUMP— 
Formatting QCBs 


From ABDUMP Mainline processing 
(8.27, Step 11) to display resource 
control blocks 


Processing Output 


The format of the VS2 dump is 
shown in the OS/VS2 
Debugging Guide, GC28-0632. 











IEAVAD0O6 


ar 4 Obtain storage from subpool 


253 for a register save area. a GETMAIN 


IG C004 
6.1] 


ABDTCB 
ABDCTCB 












SCVT No storage 
ABDUMP Mainline (8.27) 
SCVTQCBO QMJNEXT Step 11 
QMJMINOR 
Minor QCB L — —+ 2 Set the job step of the current Current TCB 
QMNNEXTA QEL task nondispatchable. LARRABEE BERERREEEEEEG Ga aaaagaan TCBADMP=1 
VA NV AN TCBNDUMP=1 
QMNGELA QELNQEL ———— 3 Search control block queues to STATUS e 
find the first major QCB. p 
| | 1GCo79 y 
red 


TCB 


TCBOTC 


ABDAREA <4 —-—-- — —_— ee 
ABDQCBM J —— 4 Format and display the major QCB. ll 
ABDQCBHD 


ABDAREA Minor QCB 


ae More minor QCBs 
ABDQCBMN QMNL 6 Format and display the QEL. ee 5 


More major QCBs 





= —— 47-5, Format and display the minor QCB. 


Current TCB 
TCBADMP=0 





7 Set the job step dispatchable. LMBABARRRARREAREESE BESEEEREEEEEREEE 


eu 
pam sas y) 


I1GC079 wh 


3.18 


i FREEMAIN 


1GCO010 
6,1] 


ABDUMP Mainline (8.27) 
Step 11 


TCBNDUMP=0 


8 _sFree the register save area 


and return control to ABDUMP 
Mainline processing. 
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Diagram 8.31 ABDUMP -- Formatting QCBs (Module IEAVAD06) 

QoS Se ere re ee ee 5 Re a a 1 CS ee eee ee eos es : aa —fooes ro 1 
| | RCUTINE | | | [ROUTINE | | 
| NOTES | NAME | LABEL | | NOTES | NAME | LABEL | 
Car Aisles SRT ARIES Ce a Sa I GE tatseSsssh lr ete Se Sa Sat a a ee re a eee 
| 1 A return code of X'O4S is passed if storage is nct | LEAVADO6| | | 6 All QELs associated with the minor QCB are formatted | LEAVAD06 | { 
| availakle. | | | | and displayed according to their position in the queue. | |MORECEL | 
| | | | | When the last QEL has keen processed, ABDQCBMN is set | | | 
| 2 If the current task is being dumped (ABDICB), the job | | [ | to 0 and the next minor QCB is selected. | | | 
| step is set nondispatchable. | | | | | | | 
| | | lt 7 | |COMEXIT | 
| 3 The QEL (queve element) is found by searching the major | |MOREQEL | | | | | 
| and minor QCB (queue control Elock) chains. Once the | | | | 8 A return code is passed in register 15: | | | 
| QEL has been found, it is tested for the following | | | | | | 

| conditions: | | | | X*'00° - successful completion | | | 
| | | | | X'O04* - insufficient storage for the dump, or a | | | 
| ® The task that requested the QEL is in the same job | | | [ failure in an ABDUMP frint routine. | | | 
| step as the task being dumped (TCBJSTCA). | | | | | | | 
| e The task is not a key 0 (TCBFLAG) nor a TSO task | | | | 1 | The following ABDUMP print routines are called: | | | 
| (TCBTSTSK), and the requesting task is the initiator| | | | | | | 
| of the jok step (TCBOTC). | | | | ® FORMAT (LEAVAD31) | | | 
| | | | | Unpacks and translates data in the print line, | | | 
| If these conditions exist, the control blocks associated | | | | providing an indentaticn factor. | | | 
| with this QEL can be displayed and formatted. If they | | | | Called to execute Steps 4, 5, and 6. | | | 
| do not, the next QEL is selected. | | | | ® FORMATO1 (IEAVAD41) | | | 
| | | | | Unpacks and translates data in the print iine, | | | 
| Note: The search of the QCB queue must be performed | | | | without providing an indentation factor. | | | 
| disabled. Displaying the control block occurs in | | | | Called to execute Steps 4 and 5. | | | 
| enabled state. | | | | e OUTPUT (IEAVAD11) | | | 
| | | | | Prints lines of the dump on an output device. | | | 
| 4 Because it is possible to have more than one QEL belcng- | | DISPLAY | | Called to execute Steps 4, 5, and 6. | | | 
| ing to a single job step associated with a major CCB, | | | | | | | 
| the ABDOCBMJ flag is checked to determine whether the | | | | Should any of the ABDUMP print routines fail (return | | | 
| major CCB was previously displayed. If this flag is | | | | code # X‘00'), control passes to cleanup processing | | | 
| off, the major QCB is formatted and displayed together | | | | (Step 7). | | | 
| with the heading if this is the first major CCB | | | | | | 
| (ABDQCBHD). After the major QCB has been precessed, | | | | Note: The appropriate label precedes each field. | | | 
| the minor QCB associated with it is selected. When the | | | Li———-~-————_—-~—_--_-- +--+ - + -- + + - - - + - - - = 1------~-- i-----~--- 4 
| last major QCB has been processed, ABDUMP enters clean- | |MOREQCB | 

ee | | | 

| 5 If the minor QCB has not Eeen displayed (ABDCCBMN = 0), | |FORMMIN | 

| it is formatted and displayed. The maximum length for | | | 

| a minor QCB name is 52 bytes; a name that exceeds this | | | 

| limit is truncated. After the wincr QCB has been | | | 

| processed, all QELS associated with it are formatted | | | 

| and displayed. When the last minor QCB has keen | | | 

| processed, ABDQCBMJ is set to 0 and the next major QCB_ | | | 

| is selected. | |MOREMIN | 

bate ee ee ee eo ee ee bf aoe a ea ea ene J 
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Diagram 8.32 
ABDUMP— 
Displaying the Save Area 


From ABDUMP Mainline processing 
(8.27, Step 11) to display the 
save area, 
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| 
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po----=--— 


~~ | 
— 


Processing Output 


The format of the VS2 dump is 
IEAVADO7 shown in the OS/VS2 
Debugging Guide, GC28-0632. 
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Obtain storage from subpool 253 for a 


register save area. GETMAIN 


IGC004 


No storage 
ABDUMP Mainline (8.27) 
Step 11 


If the task being dumped has 
completed execution, 





| 






Display contents of the problem- 

program save area associated with SAPRINT3 
each IRB 

Verify the save areas pointed to by Valid SAPRINT1 


the TCB; display if valid. 
Display save areas 
and headings. 





Format and display the two most recent 
save areas associated with the most No PRB 


recent PRB on the task active queue. a 6 


Free the register save area and return 


control to ABDUMP Mainline 
processing. fo FREEMAIN 





IGCO10 
6.1 


ABDUMP Mainline (8.27) 
Step 11 
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Ciagram 8.32 ABDUMP -- Cisplaying the Save Area (Module IEAVACO07) 


ae ae a eae ge Ee ee ee ee an gn ee a tS a pi ge he ele yg hme PD Verein ts yn area reas “TT 
[ROUTINE | 


| NAME 


A return code of x‘O4' 
availakle. 


is passed if storage is nct 


If the task has conpleted execution, there are no save 
areas to be displayed. The label for the trace is dis- 
played however. 


If an invalid missing fage interruption occurs, the 
display is terminated and the search continues fer the 
next IRB. However, if the next RB on the queue 
(RBTCBNXT) is the oldest, processing continues with Ster 
4. 


Each problem program save area, keginning with the 
first (TCBFSAB), is tested by the subroutine VALID. 
Under the following conditions, the save area is con- 
sidered valid: 


e The entire save area is addressable (this check is 
made by the Validity Check routine IEAOVIO00). 

e The save area's forward pointer (NEXTSAVE) is not 
equal to the back pointer (PREVSAVE). 

e The back pointer is equal to the previous save area 
address. 


If ccndition 1 is not fulfilled, the display is termin- 
ated. If condition 2 or 3 is nct fulfilled, the save 
area is displayed (using SAPRINT2) without headings. 


After the most recent RB has been selected, it is test- 
ed to determine whether it is a PRE (REFTIP = 0). If 
not, the next RB is selected and, when the end of the 
queue has been reached, exit processing is entered. 
Although a PRB exists, the Save areaS are not displayed 
under the following conditions: 


e The dump is not of the current task (ABDCTCB). 
e Save areas are nct addressakle. 


Instead, return is made to the caller with a return 
code of xX‘'00‘. 


IEAVADO7 


ro ee a a ea 


LABEL 


TESTIRB 


NEXTRB 


FORTRC 
FORLOOP 


BADBACK 


PRECODE 
RELOOP 


PRBLOOP 
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If entry to this processing is a result of task con- 
pletion (Step 2) or a missing PRB (Step 5), a code of 
X'00" is returned to ABDUMP Mainline processing. The 
return code is also X‘00° if processing has completed 
successfully. It is X‘0O4‘ if there was insufficient 
storage for the dump, or a failure occurred in an ABDUM 
print routine. 


The following ABDUMP print rcutines are called: 


® FORMAT (1EAVAD31) 
Unpacks and translates data in the frint line, 
providing an indentation factor. 
Called to execute Steps 3, 4, and 5. 

e FORMATO1 (IEAVAD41) 
Unpacks and translates data in the print line, 
without providing an indentation factor. 
Called to execute Steps 3, 4, and 5. 

e¢ OUTPUT (IEAVAD11) 
Prints lines of the dump on an output device. 
Called to execute Steps 3, 4, and 5. 


Should any of the ABDUMP print routines fail (return 
code # X"00'), control passes to the cleanup processing 
(Step 6). 


The appropriate label precedes each field. 
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From ABDUMP Mainline processing 
(8.27, Step 11) to display supervisor 
data by providing an interface to 
system routines 


Processing 


IEAVADO8 


1 Obtain storage from subpool 253 for 
a register save area. 


No storage 


2 Initialize the ABDPL (subcomponent 


3 Transfer control to the TCAM Formatting 
routine if possible. : INTRFACE 


Pass control to 
IEAVADOE 


4 Transfer control to the TSO Formatting 
routine if possible. 


INTRFACE 


Pass contro! to 


IKJVADO9 


5 Free the register save area and 
return control to ABDUMP 
Mainline processing. 














GETMAIN 


IGC004 
6.1 


ABDUMP Mainline (8.27) 
Step 11 


IGC005 


- FREEMAIN 


ABDUMP Mainline (8.27) 
Step 11 


Diagram 8.33 
ABDUMP Interface Routine 


Output 
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Diagram 8.33 ABDUMP Interface Routine (Module IEAVADO8) 


(SSS SS Ea ee eS eee ae ee eee ee SS See SS 5 eRe a Spa oH SSeS 1 Ss ki aa a aa a Te 5 ane enatet 1 
| | RCUTINE | | | JROUTINE | 
| NCTES [NAME |LABEL | | NOTES ee pee ! 
So a ett Si mu Se Gc es sh en cg yh nme an a is mt Se i ei" ie a SS See i ce pa Ss Nl pu a pa lk a ah cl eh pee { ---------- - - rr rt tne a es es Se 
| 1 A return code of X'"04‘* is passed if Storage is nct | TEAVAD08| | | 3 The TCAM Formatting routine gains control (using the | LEAVADO8 | | 
[ available. | | | | internal subroutine INTRFACE) if a TCAM AVT (address | | | 
| | | | =| vector table) exists, and if the TCB being displayed is | | | 
| 2 The subcomponent parameter list iS initialized because | | | | the TCB for the TCAM Message Control Program. The | | | 
| at least one formatting routine will get control. The | | | | subroutine INTRFACE is given the entry-point name and | | INTRFACE | 
| parameter list is initialized to the following values: 1 | | | an error message ID. ‘The error nessage ID iS necessary | | | 
| | | | | in case the formatting routine cannot allocate storage _ | | | 
| ADPLTCB = Address of TCB of task being dumped. | | | | for work and save areas. INTRFACE then loads the | | | 
| ADPLTJID = Terminal job identifier (JSCBTJID), if | | | | requested module, passes control to it, and deletes it | | | 
| there is a job-step control block. | | | | upon completion of processing. If INTRFACE receives a_ | | 
| ADPLBUF = Address cf print buffer. | | | | return code other than 0, it prints an error message and| | | 
| ADPLRNT = Address cf PRINT routine (IEAVAD81). | | | | returns control to the caller. Otherwise it returns | | 

| ADPLUPRX = Address of the exit routine ABLCUPRXT. | | | | directly tc the caller. | | | 
| The processing of either the TCAM or TSO | | | | | | | 
| system formatting routine may cause an | | | ( A description of the TCAM Formatting routine is avail- | | | 
| invalid missing page interruption. If so, | | | | able in OS/VS TCAM Lcgic. | | | 
| the system routine can avoid aknormral ter-| | | | | | | 
| mination of the task, and suspension of | | | | 4 The TSO Formatting routine gains ccntrol if the follcw- | | | 
| the dump, by placing the address of an | | | | ing are true: | | 
| exit routine in ABDUPRXT. If an invalid | | { | | | | 
| missing page interruption occurs, control | | | | * The task being dumped is a TSO task (TCBTSTSK = 1). | | | 
| returns to the system routine at the spfe- | | | | e Time sharing is active (CVITSRDY = 1). | | | 
| cified exit routine address. The exit | | | | e A JSCB exists (contents cf register 5 # 0). | | 

| routine restores registers 14-2 from the | | | | | | | 
| PIE and continues with excepticn handling. | | | | The subroutine INTRFACE (see Step 3) provides the | | INTRFACE | 
| If an invalid missing page interruption | | | | necessary linkage. | | | 
| does nct occur, the system routine must | | | | | | | 
| set the exit routine address to 0. If an | | | | A description of the TSO Formatting routine is available| | | 
| invalid missing page interruption cccurs, | | | | in OS/VS2 TSO Control Program Logic. | | | 
| and the exit routine address is 0, the | | | | | | | 
| task is abnormally terminated with a ccm- | | | | 5 A return code is passed in register 15: | | FREERET | 
| pletion code of X‘0C4". | | | | | | | 
| | | ; | X'00" ~ successful completion. | | 

| ADPLRES2 = 4 words used Ly system formatting routines. | | l { X'O4* - insufficient storage fer the dump. H H | 
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From ABDUMP Mainline processing 


(8.27, Step 11) to display the 
control program nucleus 


Input Processing 
IEAVADOA 
Fixed in lower 1° Obtain storage from subpool 253 


real storage 


TTPOINT 


Trace Table 
pointers 


TRACESRT 2 


TRACEND 
CVT 
3 
CVTNUCB 


ABDAREA 


ABDSQSDM 4 


ABDTCB 
ABDCTCB 
UPRFMET 
ABDUPRFN 


DQE _ 


DQEBLKAD 


ABDAREA CVT 


ABDSQSDM CVTABEND 5 


SCVT 


SCVTMSSQ 


> OVRFELB 
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DQESQA 





DQE _ as 


DQELNTH 
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ABDTCB 


ABDCTCB 8 


ABDAREA 





for a register save area. 


Determine whether the supervisor 
trace facility is active. 


Display the nucleus exclusive of the 


supervisor trace table. 


Display the LSQA. 


Display the SQA. 


Set the job step dispatchable. 


Display active SVC modules for 
the task. 


Free the register save area and 
return control to ABDUMP 
Mainline processing. 





Diagram 8.34 
ABDUMP— 
Displaying the Nucleus 


Output 


The format of the VS2 dump is 


shown in the OS/VS2 


Debugging Guide, GC28-0632. 
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Diagram 8.34 ABDUMP -- Displaying the Nucleus (Module IEAVADOA) 


DR fee end ce pe ae Bp eae, BOG APY shee) a ater et Slane! Peng Anas t a ete 2 APU ti iene aa = 
| ROUTINE | 


1 <A return code of x'04‘' is passed if storage is nct 
available. 


2 The nucleus is displayed in two sections if part of the 
nucleus is above the trace table. The trace takle is 
often the last block in the nucleus. 


3 If the supervisor trace is active, the nucleus is first 


displayed up to the start of the trace table (TRACESRT). 


The end of tne trace table is then found (TRACEND+32). 


If there is more nucleus to display, a continuation mes- 


Sage is printed and the second part of the nucleus is 
displayed. 


4 If the current task is being dumped, the jok sterg is 


set nondispatchakle to prevent changes in the LSCA when 
the dump is being taken. If there is no SPQE 

(subpool queue element) for the LSQA, execution 
continues with Step 5. The length and address are 
found from the DQE and FORMET (IEAVAD71) is called toc 
print the LSQA. 


next page where the display continues. 


§ If the SQA has not been displayed (ABDSQSDM = 
processed in a manner Similar to the LSQA. 


0), it is 


is called. 


6 If the current task is being dumped, the job ster is 


reset dispatchable. 


7 «If the task keing dumped is not the current task, pro- 


cessing begins with the RB chained to the TCE of the 
task being dumped. The SVRB following the ABDUMF SVRB 
is obtained; if ABEND called AEBDUMP (APFABEND = 0), the 
ABEND SVRB is Lypassed. 


If an invalid missing page interruftion 
occurs during IEAVAD71 processing, a skip is made to the 


Invalid mis- 
sing page interruptions are again expected when IEAVAD71 


a a a i ee 
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The FINDRB subroutine is called twice; the first time 

to scan the RB queue fcr SVREs and the second time tc 
search for an SVRB with a name equal to the name found 
in the initial search. If FINDRB has keen called to 
locate SVRBs, the contents supervision routine IFAQCCSR 
is called to locate the CDE for the module on the link 
pack area queve. If the CDF is not found, IEFAVVMSR is 
called to obtain the LPDE (link pack directory entry) 
for the SVC name. If the LPDF is found, the name of the 
module (found in LPDENAME) is returned to the caller 
along with the SVRB address. FINDRB is again called to 
search for an SVRB of a module with the same name as 
that in LPDENAME. The address of the two SVRBS are con- 
pared, and, if equal, the module is displayed. If a 
match is not found, the module was displayed earlier 
when the previous SVRB was processed. After the display 
of the module has been completed, the search is renewed 
for a new SVRB. When all modules have been displayed, 
clean-up processing is entered. 


The following types of SVRBS are processed Ly the 
FINDRB subroutine: 
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[ 
| 
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| 
[ 
| 
| 
| 
| 
[ 
| 
[ 
| 
| 
| 
[ 
| 
| 
e SVRB for a type 3-SVC or the first load of a type-4 | 
svc. | 
e SVRB for a non-first load of a type-4 paged SVC. | 
® SVRB for a non-first load cf a fixed SVC. | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 
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A return code is passed in register 15: 


X'00* - successful completion 
X'O4" - insufficient storage for the dump, or a fail- 


ure in an ABDUMP print routine. 
The following ABDUMP rfrint routines are called: 


e OUTPUT (IEAVAD11) 
Prints lines of the dump on an output device. 
Called to execute steps 1, 3, 4, 5, and 7. 
e FORMET (IEAVAD71) 
Prints blocks of storage. 
Called to execute steps 3, 4, 5, and 7. 
Should either ABDUMP print routine fail (return code # 
0), the job step is set dispatchable prior tc passing 
control to cleanup processing (Step 8). 


Note: The appropriate lakel precedes each field. 
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From ABDUMP Mainline processing 
(8.27, Step 11) to display registers, 


storage, and active modules 








Register 8 


Address ot L_ 4 
IEAOVLOO 
> User Snapshot 
List 

cman! aa 
-—— 
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ee | 


TCB 
TCBLLS 
TCBFC 


| 
CDE @-— — 4 p> Extent List 


[eon TS [| 














4 If displaying of active JPA and LPA 


6 Display active JPA and LPA modules 


Processing 


IEAVADOB 


1 Obtain storage from subpool! 253 for 
a register save area. 


No storage 


2 Display register contents. 


3 Display storage described by the 


snapshot list. 


Invalid missing 
page interruption 


modules has not been requested. 


5 sif the task being dumped has 


completed execution. 


associated with the RB queue. 





Display module 
extents. 












7 Display active JPA and LPA modules 
on the load list. 


DUMPMOD 


Display module 
extents. 






8 Free the register save area and 
return control to ABDUMP 
Mainline processing. 


DUMPMOD 





Diagram 8.35 
ABDUMP— 


Displaying Registers 


Output 


The format of the VS2 dump is 
shown in the OS/VS2 
Debugging Guide, GC28-0632. 
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Validity Check 
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each page. 
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Print message: 
"STORAGE NOT 
DUMPED DUE TO 
BAD LIST ADDRESS" 


8.38 
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Diagram 8.35 ABDUMP -- Displaying Registers (Module LEAVADO8) 
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| ROUTINE | 


A return code of X'0O4! 
availakle. 


is passed if storage is not 


The register contents are displayed if requested 
(APFREGS = 1). If the task being dumped is the current 
task, the floating-pcint registers are displayed; they 
are stored in the current TCE during the formatting and 
displaying. The general registers are found in the 
ABDUMP SVRB (SNAP called AEDUMP) cr the ABEND SVRB 
(ABEND called ABDUMP). 
dumped, the floating-point and general registers are 
found in the TCB of the task being dumped. 


The snapshot list is displayed if supplied and request- 
ed by the user (APFSNAP = 1). If an invalid missing 
page interruption occurs while fetching an address or 
length from the list, an error message is displayed and 
execution continues with Step 3. The Validity Check 
routine (IEAQVLOO) is called to verify each page con- 
taining data to be displayed. 
list entry is ignored and the next entry is processed. 
Otherwise, the storage described by the snapshot list 
entry is displayed. 


If the task has not completed execution, all modules 
associated with RBS on the active queue are displayed 
if the fcllowing conditions exist: 


e The RB is a PRE (RBFIP = 0). 

e A CDE exists (RBCDE1 # 0). 

e The module is “in-core™ (CDNIC = 0). 

The RB queue is searched beginning with the oldest RB. 
After the RB queue has been exhausted, the lcad list is 
processed (Step 7). The internal subroutine DUMPMOCD is 
passed the address of a CDE. After verifying that the 
module‘s queue is to be displayed, DUMPMOD locates 
extent lists for the module and calls FORMET (IEAVAD71) 
to print these extents. 


If the current task is not being 


If a page is invalid, the 
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For each LLE (load list element) on the active task 
queue, all associated modules are displayed if the 
following conditions exist: 


e The module is “"in-core*™ (CDNIC = 0). 

e The CDE is not queued to an RB; if it is, the RR 
must not be on the active queue of the task being 
dumped. 


The internal subroutine DUMPMOD is again called to 
process the extents for the module. 


A return code is passed in register 15: 


x* 00° 
x*Ou" 


- successful completion. 
- insufficient storage fcr the dumrp, 
ure in an ABDUMP print routine. 


or a fail- 


The following ABCDUMP print routines are called: 


e FORMAT22 (IEAVAD61) 
Unpacks and transiates data in the print line. 
Called to execute Steps 2, 6, and 7. 

e OUTPUT (IEAVAD11) 
Prints lines of the dump on an output device. 


Called to execute Steps 2, 3, 6, and 7. 
© FORMET (IEAVAD71) 

Prints blocks of stcrage. 

Called to execute Steps 3, 6, and 7. 


Should any of the ABLCUMP print routines fail (return 
code # X'00'), control passes to cleanup processing 
(Step 8). 


The appropriate label precedes each field. 
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From ABDUMP Mainline processing 
(8.27, Step 11) to display trace table 


information 


Input Processing 


IEAVADOC 


1 Obtain storage from subpool 253 for a 
register save area. 





GTFS : 
sa L —_—_— 2 If GTF is active and performing 
CVTFORM an "in-core" trace 

ABDAREA q—— __—_ 3 If GTF failed 
ABDGTFLG 
ABDAREA <q —_— —_— | —_ —_ —_ —_ ——_ G If a buffer has not been obtained 
ABDTRBIT for the supervisor trace table 
ABDAREA q<—— ———<— 5 Format and display trace table 
ABDFP entries. 
ABDLP 
ABDCP1 ———— 6 Load the GTF Processing module. 
ABDCP | 
ABDAREA — —_I 


7 Free the register save area and 
return control to ABDUMP 
Mainline processing. 


ABDSSPAR 





| GETMAIN 


IGC004 
6.1] 


ABDUMP Mainline (8.27) 
Step 11 


>> 6 a 


No storage 


OUTPUT 


IEAVAD 11 
Print message: 


"GTF TRACE FAILURE 


- NO TRACE TABLE" 
8.38 


OUTPUT 


IEAVADIT 
Print message: 


"NO CORE FOR 





TRACE TABLE" 


8.38 


cs GTF Formatting module 


IG COFO5A 
Format and display 
the GTF trace. 


| FREEMAIN 
1GCO005 
6.1 


ABDUMP Mainline (8.27) 
Step 1] 





Diagram 8.36 
ABDUMP— 
Formating Trace Data 


Output 


The format of the trace table js 
shown in the OS/VS2 


Debugging Guide, GC28-0632. 
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Diagram 8.36 


ABDUMP -- Formatting Trace Data (Module IEAVADOC) 
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| ROUTINE | 


|NAME 
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A return code of X‘'04" is passed if storage is not 
available. 


if ABDGTFLG is on, ABDUMP issued a HOOK macro instruct- 
ion to suspend GTF. The suspension of the trace indi- 
cates there was a failure in GTF. After printing the 
error message, the return code is saved and control 
passes to cleanup frocessing (Step 7). 


Upon return from OUTPUT, the return code is saved and 
control passes to cleanuf processing (Step 7). 


The trace table entries are formatted and displayed 
beginning with the oldest entry (the one following the 
new current entry ABDCP). All entries existing rFetween 
the old current (ABDCP1) and the new current (ABDCP), 
are invalid because they occurred during the time the 
trace table was moved (IEAVADO01 execution). If GTF 
suspended the supervisor trace, a flag (SUSPEND) is set 
in the current trace entry. Before each entry is for- 
matted, this flag is tested. If it is set, CUTPUT is 
called to print a message indicating that there may be 
trace entries that are not displayed in the takle. 
After all entries have Leen displayed, the trace table 
buffer is freed. 


Note: The trace table is provided only in a SNAP dure. 


The interface with IGCOFO5A is established using 
ABDSSPAR as the parameter list. On return from 
IGCOFOSA, if the return code is not 0, a return code of 
X'10° is passed to ABDUMP Mainline processing. 


7 A return code is passed in register 15: 


X‘O00* - successful completion. 

X'O4* - an ABDUMP frint routine failed while execut- 
ing. 

X*'OC* - storage was not obtained for the register 
save area. ABDUMP Mainline processing must 
free the trace table kuffer if it was obtain- 
ed earlier. 


1 The following ABDUMP print routines are called: 


e FORMAT (IEAVAD31) 
Unpacks and translates data in the print line, 
providing an indentaticn factor. 
Called to execute Step 5. 

© OUTPUT (IEAVAD11) 
Prints lines of the dump on an output device. 
Called to execute sters 3, 4, and 5. 


Should either ABDUMP print rcutine fail (return code # 
X'00°), control passes to cleanup processing (Step 7). 


Note: The appropriate label precedes each field. 
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Diagram 8.37 
ABDUMP— 
Displaying Subpools 


From ABDUMP Mainline processing 
(8.27, Step 11) to display allocated 
storage 


Processing Output 





IEAVADOD The format of the VS2 dump 
is shown in the OS/VS2 


Debugging Guide, GC28-0632. 








1 Obtain storage from subpool 253 for 


a register save area. GETMAIN 
ma 
6.) 


ABDUMP Mainline (8.27) 
Step 11 









2 Set tasks in the job step No storage 
nondispatchable if the 
current task is being 


dumped. MWBRRRAARABERAEREAEAEERE REGGE GQUaGaaaaaaaana 


TCBADMP=1 
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3 Locate SPQEs for subpoo! 252 on the 
job-step task's TCB. 
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Scan DQEs for 
allocated segments 
of storage 






SPQE 


SPDQEAD 
DQESEPTR 4 Display allocated portions of 


subpool 252. 








CDESCAN 





Eliminate space 
allocated for 


modules; display 
remainder. 


SPSHARE 5 Display user subpools. LOCATE 
SPDQEAD 


CDESCAN 
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ABDAREA 






TCBADMP=0 
TCBNDUMP=0 


STATUS 
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Step 11 







6 Set the job step dispatchable if 
MESES any DRAB BRE REESE a Gaaaaaceaaaaantaaan 


7 Free the register save area and 
return control to ABDUMP 
Mainline processing. 
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Diagram 8.37 ABDUMP -- Lisplaying Subpools (Module IEAVALCOD) 
pres ee eee oe ee ee ee ee eee a ee eee 


1 <A return code of X‘'O4* is passed if storage is nct 


availakle. 


The job step must Le set nondispatchable to ensure that 
storage contents are accurate. If the current task is 

not being dumped, the jok step is already nondispatch- 

able. 


If the SPQE is not for subpool 252, the next SPQE is 
obtained. When the last SPOE has keen searched 
(SPQEPTR = 0) and subpool 252 does not exist, execution 
continues with Step 5. 


The LOCATE subroutine is called with tne address of the 
first DQE for a subpcol that is to be displayed. tcr 
each DQE on the queue, allocated segments are isolated 
one at a time. The CDESCAN subrcutine is tnen called 
to orocess these segments cy eliminating all space 
allocated for modules and displaying the remainder. 


Displaying is perforired for all the sukpocols descriked 
by SPQEs on the task queue of the task being dumped 
under the following conditions: 


The subpool is a user subpool (0-127). 
* The task being dumped owns the subpool (SPSHARE = 0) 
* The dumped task is not the owner and (1) has a key 
other than 0 (TCBFLAG # 9), and (2) is not a TSO 
task (TCBTSTSK # 1). 
e The task is not the owner and either has a key of 
0 or is a TSO task. The task owning the sukfool is 
in the same jok step (TCEJSTCA) as the dumped task. 
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After a valid SPQE has keen found, the DQE for this 
subpool is found and the LOCATE routine is called. The 
processing performed Ly the LOCATE and CDESCAN routines 
is explained in Step 4. 

Upon successful return from the LOCATE routine, the 
next SPCE fcr a user sukpool is frocessed. 


A return code is passed in register 15: 


X'00* - successful completion 
X*Ou" - insufficient storage for the dump, 
ure in an ABDUMP print routine. 


or a fail- 


The foilowing ABDUMP print routines are called: 

e FORMET (ILAVAD71) 
Prints Elocks of storage. 
Called to execute Steps 4 and 5. 

e OUTPUT (IEAVAD11) 
Prints lines of the dump cn an outgut device. 
Called to print any messages that mignt be 
needed. 


Should either of the AEBDUMP print routines fail (return 
code # X‘'00'), control passes to cleanup processing 
(Step 6). 
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ABDAREA 


ABDAREA ¢, 
ABDLCTR 


ABDAREA 


ABDDECB 


ABDPTRS1 
ABDPTRS2 
ABDPTRS3 


ABDAREA 
ABDLOG 


ABDPTRS1 
ABDPTRS2 
ABDPTRS3 





Diagram 8.38 
ABDUMP OUTPUT, OUTPUTS, 
From the caller to write lines of and PRINT Routines 
the dump on an output device 
Processing Output 
IEAVAD 11 
Buffer Slot ABDAREA 





be 4 1 Move record into the output buffer. ABDLCTR= 
No more ABDLCTR+1 


buffer space 






-—_—— 2 Increase the page count if the ABDAREA 
maximum number of lines per page ABDPCTR= 
a ee has been reached, LABS SEES EEREEGaa 


SYNCH 


1GCQ12 
Give control to 


= SSS Write the contents of the buffer 
to the output device, 


BSAM WRITE and 
CHECK routines 
4.4 


From the caller to write . 
any lines remaining in 
the buffer after ABDUMP 
processing has been 





completed 
7 IEAVAD21 
L_ —__ ____ 4 Determine whether there is any 


Ea eat ne remaining data in the output 
San buffer. 


the OUTPUT routine 
from subsystem modules 


Caller 
IEAVAD81 
5 Disable the invalid missing page ABDAREA 
interruption exit routine. KALA DELETE 
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Diagram 8.38 ABDUMP OUTPUT, OUTPUTS, and PRINT Routines (Modul 
(SaaS SS aa S Se Sa Sea a a eae a ear ee ee Se ae 2 a Sf SSe-= 1 


i ee oo es —- 8238: ne -: oe ee se 


NOTES | 
1 The output record, starting from ABDLOG, is noved to | 
the output ktuffer for a length of 125 rytes (a 4-byte | 
record descriptor word and 121 bytes of data). The line| 
count is increased Fy 1. If there is insufficient space| 
(125 bytes) in the buffer for ancther record, frepara-_ | 
tions are made to write the contents of the -tuffer (Step| 
3). 


Le) 


The maximum number of lines per page is 56. When this 
number has teen reached, the page count is increased 
and a carriage control character is set to eject toa 
new page. 


Go 


The SYNCH macro instruction is used to enter the 
internal subroutine WRITCHEK, which issues WRITE and 
CHECK macro instructions. The SYNCH macro instruction 
is used to ensure that the WRITCHEK sukroutine is 
entered with the user protection key. 


ol 


Before disakling the exit routine, register 1 is loaded 
with the address of ABLAREA, which is located in the 
second word of the ESA. 


This routine is called ky the suksystem routines TCAM 
and GTF to provide the correct interface to the CUTFUT 
routine (IEAVAD11). Exits to handle invalid missing 
page interruptions are prohibited to prevent careless 
use cf the field ry the suksystem modules. 
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Diagram 8.39 
ABDUMP FORMAT and FORMATO1 Routines 


From the caller to unpack and 
translate data, providing an 
indentation factor for the 
print line 


Input Processing Output 






Register ] 


























a = IEAVAD31 
Address of i ABDAREA 
PEDARES = Calculate the print position for t 
: Se eae ie ene = or ABDLINE=ABDLINE + indentation 
P . factor 
ABDAREA @q-—---—---—- - 74 
ABDLLINE LL ___-__ If the end of the layout line has 
been reached Caller 
ABDAREA 
appa “WL —— 3 Ifan invalid missing page ABDUPRXT=add £ FORMATX 
UPRFMAT=1 interruption is anticipated —— : ea ck 
routine 
ABDAREA ¢—— — -—--+--- 7 ABDAREA 
ABDBPTR L— —— — — -- 4. Unpack data and translate to ABDEMTWK -=- Contains 
printable characters. ee ee es ; 
ABDFMTWK printable data 
ABDAREA 


ABDAREA SSS SS Se 4 


ABDFMTWK L———— 
From the caller to 

REDEERS unpack and translate 

ABDLINE data without providing 


an indentation factor 


ee ABDLINE 


Pen 2 





5 Move data into the print line. 







IEAVAD41 





6 Pass control to the FORMAT 


routine, bypassing indentation 


processing. aE 2 
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Diagram 8.39 ABDUMP FORMAT and FORMATO1 Routines (Module IEAVAD31) 
(3. - oe ea 1 Laine SRS ERIE fo 1 
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The layout line (ABDLLINE) contains the lakel of the 
field immediately followed by the value of the field. 
The indentation factor (the first byte of the layout 
line) determines how many spaces from the beginning of 
the print line (ABDLINE) a particular field starts. The 
Frint position for the first field of the print line is 
obtained by adding the indentaticn factor specified in 
the layout line to the beginning of the print line. The 
layout line pointer is then increased fast the indenta- 
tion factor. The address of the control block to be 
formatted is found in ABDBPTR. 
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| 

| 

If the end of the layout line has not Leen reached (the | 
delimiter character X"FF" has not been encountered), the| 
label is obtained and moved into the print line. If | 
control is returned to the caller, a code of X‘'00" is | 
passed. | 
If the data to be formatted results in an invalid mis- 
Sing page interruption, the address of the exit routine | 
to handle these interruptions (FORMATX) is placed in | 
ABDAREA. Should an invalid misSing page | 
interruption occur, FORMATX is called to restore | 
registers 14-2 from the PIE. Return is then made to | 
the caller with a return code of X"08'. | 
| 

| 

l 

| 

| 

| 

| 


The data to be formatted is moved into a work area 
(ABDFMTWK) where it is unpacked and translated into 
EBCDIC characters. 


| 

; | 

After the data has been moved, the layout and print 

line counters are increased for the next entry. The | 

number of blanks bketween fields in the print line is 

assumed to be 3 unless specified otherwise Ly the user. | 
| 


In bypasSSing indentaticn processing, the first print 
fosition is assumed to Le correct. 
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From the caller to translate data 


Input Processing 





Register | IEAVAD51 


Address of 
ABDAREA 


re ABDAREA 


ABDSTAD 
ABDBPTR 


ABDAREA <+_--—- -—- -—|--—-— — 2 
UPRFMT20 


1 Obtain the address of the data 
area to be translated. 


if an invalid missing page 
interruption is anticipated 


Register 2 ¢ 


Address of data area 


3 Move data into the print line. 


4 Scan characters in the data area. 


—————+ 5 Translate the data area into 
printable characters. 








From the caller 
to unpack and 
translate data 


JEAVAD61 


ABDAREA 
ABLUNE C_-_.4.00w-.-_w0nn.T-.---.-”-.-TY..cCY.".”’”.. > 


6 Obtain the address of the layout 


line. 





Register 4 €- 
Address of layout line 7 sIf the last line entry has been 
processed. 
ABDAREA 8 Obtain the address and size of the 
DLN: data area to be unpacked. 
platloilaa aoe If an invalid missing page 
UPRFMT20 interruption is anticipated 
Register 2 
Move data into the work area; 
Address of data area unpack and translate. 
ABDAREA 


ABDFMIWK CC | S11 Move data into the print line. 
a 7 
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Diagram 8.40 
ABDUMP FORMAT20 and FORMAT22 Routines 


Output 


Register 2 


Address of data area 


ABDAREA 


ABDUPRXT=address of 
FORMZ20X routine 


ABDAREA 


i 
: 


Register 4 


Address of layout line 


Caller 


ABDAREA 


ee  OABDLINE=ABDLINE + offset 


ABDAREA 


ABDUPRXT=address of 
FORM20X routine 


ABDAREA 
ABDFMTWK -- Contains unpacked 
and translated data 

ABDAREA 
ABDLINE 
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Diagram 8.40 ABDUMP FORMAT20 and FORMAT22 Routines (Mcdule IEAVAD51) 
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FORMAT20 provides an EBCDIC translation of a line (32 


bytes) of virtual stcrage. The data area kFegins at the | 


address specified in ABDSTAD. The data is rounded to a 
32-byte boundary and extends for 32 bytes. MThe location 


counter (ABDBPTR) is the virtual address of the data 
being dumped. The value of the location counter is 
expanded to six hexadecimal characters, positioned at 
the beginning of the print line (AEBDLINE). Following 
the location counter are eight fullwords that are 
unpacked into two groups of four werds each. This is 
the data at the address specified by the location 
counter. 


If an invalid missing page interruption occurs, the 
FORM20X routine is entered to perform the following 
processing: 


e Restore registers 14-2 from the PIE. 

e Blank the print line (ABDLINE). 

e Return control to the caller with a return ccde cf 
X*'O8*. 


After moving the data, invalid missing page inter- 
ruptions are disabled. 


An asterisk precedes and follows the transiated data. 
If the character is neither alphanumeric nor a blank, 
it is replaced by a character that translates into a 
period. All 32 characters are processed in this way. 


After translating the characters, FORMAT22 (IEAVAD61) 
is called with the layout iine (register 4) set to the 


Standard layout line fer unpacking the location counter. 


If the layout line entry delimiter (X‘FF") has been 


encountered, pointers are saved and control is returned 


to the cailer. 


The displacement is added to the print line to oktain 
the correct locaticn in which tc place the data. 


After moving the data to the print line, the layout line 


counter is increased to the next entry and processing 
continues with Step 7. 
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Diagram 8.41 


ABDUMP FORMET Routine 
From the caller to print 
blocks of storage 
Input Processing Output 
IEAVAD71 
Register 1 
Address of ABDAREA 1 Obtain storage for a register save 
ABDAREA ABDBLOCK a area from subpoo! 253. GETMAIN 
| fo IG-C004 
| 6.1 
\ 
| No storage 
| Caller ABDAREA 


ABDSTAD 
“ABDSIZE 


SSS 2 Adjust length of storage blocks. 





Invalid missing 


ir std page interruption 
1 during processing ABDIND 


L____ _ — 3 Process complete lines of data. 5 1 ABDIDENT=0 


ABDINCPL 


UPRFMET 


g Invalid missing 
“7 page interruption 


ABDAREA 
ABDINCPL eee 4 Process incomplete lines of dtr, > 6 


Line printed 


are | 
ABDUPREN a 5 Process complete lines that were 7 
interrupted by an invalid missing All lines printed 


ABDUPRSI page interruption. > 7 


Valid page found 
ae 





ABDAREA @- 
ABDUPRPM’ L-__._. 6 Process incomplete lines that were 


interrupted by an invalid missing 
page interruption. 


7 Free the register save area and 


return to the caller. | FREEMAIN 


IGC005 


Caller 
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Diagram 8.41 ABDUMP FORMET Routine (Module IEAVAD71) 
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The FORMET routine displays clocks of storage which are 
a multiple of fullwords. The starting address provided 
by the user (ABDSTAD) is rounded down to a fullwcrd 
boundary; the numker of Lytes to Le printed (ABDSIZE) 
is rounded up to a fullwcrd boundary. The indentaticn 
factor and identical line counter (ABDIDENT) are set to 
0. Because iines are frinted on 32-byte boundaries, 
the starting address is rounded down to a multiple of 
32 bytes. If an indentation factor is required, it is 
saved in ABDIND. The numker of lines to be printed is 
then calculated. ABDINCPL contains the nurker of Lytes 
in the last, incomplete line. 


The starting address is rounded down to a 32-Lyte 
boundary. FORMAT20 is called tc unpack the locaticn 
counter address into printable hexadecimal, and trans- 
late the 32 bytes of data into EBCLIC. If invalid 
missing page interruptions are expected (UPRFMET=1), and 
one iS encountered during FORMAT20 processing, ccntrcl 
passes to Step 5. 


red, FORMAT22 is invoked to unpack the data line. For 
the first complete line the indentation factecr is calcu- 
lated and the line is adjusted accordingly. Invalid 
missing page interruptions are processed as descriked 
above. 


If FORMAT22 processing did not result in an invalid 
missing page interruption, the CUTPUT routine is 
invoked to print the data line. 
Upon return from OUTPUT, tests are made to determine 
whether the next line to Le printed is identical to the 
previously printed line. If yes, an identical line 
message is printed as follows: 
LINE xxxxxx SAME AS ABOVE -~- cne identical line 
LINES xXxxxxx - yyyyyy SAME AS ABOVE -- more than one 
identical line 
If the line is not identical, 
described earlier. 
After all ccmplete lines have keen processed, any in- 
complete line is printed (Step 4). 
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| RCUTINE | 
|NAME 


| 
[LABEL | 


When a partial data line exists (less than 32 rEytes), | FORMET 


Go 


fey) 
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FORMAT20 is called to unpack the location counter 
address and translate the data line into EBCDIc. 
FORMAT22 is called to unpack the data line. When the 
incomplete line has been formatted, it is printed (using 
the OUTPUT routine) and control returns to the caller. 


If an invalid missing page interruption occurred during 
UPR FORMAT20 or FORMAT22 processing, several options are 
possible: 


e Control is immediately returned to the caller (Ster 
7). 

e The line that caused the invalid missing fage 
interruption is skipped; the next valid defined 
page is found and frocessing ccntinues from Step 3. 
If all lines have keen printed, exit processing 
(Step 7) is entered. 

e A message is printed descriking the invalid lines: 

LOCATIONS xxxxxx - yyyyyy NOT DEFINED 
Processing for the next valid defined page con- 
tinues as described above. 


If a message is requested, it alsc reads as follcws: 
LOCATIONS xxxxxx - yyyyyy NOT DEFINED 


A return code of X'00° is provided for the caller. 


The following ABDUMP print routines are called: 


® FORMAT20 (IEAVAD51) 
Translates data in the print line. 
Called to execute Steps 3 and 4. 
e OUTPUT (IEAVAD11) 
Prints lines of the dump on an output device. 
Called to execute Steps 3 and 4; also Steps 5 
and 6 when a message is requested. 
® FORMAT22 (IEAVAD61) 
Unpacks and translates data in the print line. 
Called to execute Sters 3 and 4; also Sters 5 
and 6 when a message is requested. 
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STA Services Routine 
Builds SCBs (STA Control Blocks): 


SVC SLIH (after an SVC 60) 


(User-issued STAE macro instruction) 


STA Services Routine 
8.43 


@ Create or overlay a STAE, STAI, 
or STAR SCB (STA control block) 
or cancel a STAE or STAI SCB 
specifying a user's exit routine 
to be given control if the user's 
task is abnormally terminated. 


User Exit 
Routine 


Diagram 8.42 
Overview of the STA Services 


and ASIR Routines 


ASIR schedules a user's 
exit and retry routines: 


IGC1001C 


ABEND 
8.14 
e Check for an existing | e Continue processing 
SCB, abnormal termination. 


IGCOBOIC 


ASIR Phase 1 
8.44 


e@ Schedule a STAE, STAI, or STAR 


user exit routine. 


ASIR Phase 2 
8.45 
; @ Route internal control for retry/ 
User Exit Routine no retry requests from the user 
exit routine, 


PHASE3 PHASE4 


ASIR Phase 3 ASIR Phase 4 
8.46 : 
e@ Purge RBs and schedule a user e@ Close DCBs within the bounds 
retry routine. of the extent list of RBs being 
purged for retry. 


User Retry Routine 
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Diagram 8.43 (Steps 1-3) 
STA Services Routine 
From SVC SLIH (2.3) (after an SVC 60 
has been issued by the STAE macro) to 
create, cancel, or overlay a STA control 


block 







Input Processing Output 


IGC00060 









0 0 STAE request 
0 1 STAI request 
1 


0 STAR request QPOINT 


Find valid STAE SCB, Register 15 

A, If there is no STAE SCB 
belonging to the requester's 
RB 


Return codes: 
No STAE SCB = X'08' 
SCB not owned by 
requester's RB = X'10' 


Register 0 Register 1 Register 15 
egister 
Request type Address of . . 
= [7 1 If a STA recursion exists SF oReturn code = X'08! 
X'00'=CREATE SCB l 
X'04'=CANCEL SCB | . 
X'08'=OVERLAY SCB | Sa via 
l 
STAE Macro | 
Parameter List | nee 
Address of CVT Flags Address of | — 
user exit ! Find first non-STAI 
Address of data I - 2 For CANCEL and OVERLAY requests: SCB. Register 15 
| if there are no non-STAI SCBs on the 
7 ; | SCB queue ey. Retum-code =X708' 
Address of TCB TCB address of | 
attaching task 
Caller via 
Flags in first byte: | SVC 3 
Address of SVRB Bins: “Wales deans: | 3 For CANCEL requests: 
| 
| 


————-——-——----45 





TCBSTABE 
TCBSTABB - 





Caller via 


SVC 3 ——— 
ese 


AAAAAAABAAAARARAaS AREER BE EEE 


FREEMAIN 


IGCO10 
Free subpool 255, 


TCBSTABB 


J 





me 





SCBOWNRA —-4 
SCBCHAIN | B. Cancel STAE by dequeving it 


from the requester's SCB queve 
and freeing the storage it 
occupied. 


6.1 


AAA AOS 


Register 15 


| Return code = X'00' | code = X'00' 





Caller via 


SVC 3 


(Continued at Step 4) 
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Diagram 8.43 (Steps 1-3) STA Services Routine (Module IEAVSTAO) 


(rn eqn 


1 If the user's exit routine issues a STAE macro 
instruction, TCBSTABE is set, indicating a STA 
recursion. If a recursion were allowed, it would 
destroy the integrity of the SCB queue. 


2 TCBSTABB is the SCB queue fointer. If it is 0, there 
are no SCBs. 
3A SCBOWNRA contains the address of the RB under which the 


STAE macro instruction was issued. Only STAE SCEs can 
be canceled. There is no facility to cancel STAR or 
STAI SCBs. 


B An SCB is dequeued by setting the preceding SCE rfointer 
(SCBCHAIN or TCBSTABB) with the value of the canceled 
SCB's SCBCHAIN pointer. 
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| ROUTINE 
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Diagram 8.43 (Step 4) 
STA Services Routine 


Processing Output 


@ Check validity of CREATE and OVERLAY 


requests: Validity Check 


A. Check the validity of the parameter JEAOVLO2 Register 15 
list and page in the parameter list 


Determine address validity 
if necessary, 


Return codes: 
and where located, 


Address in real storage = X'00' 
3.19 > Address not in real storage = X'04' 

Address invalid = X'08' or X'0C' 
PREFIX 


Page in parameter list 


RBINTCOD - For STAI requests, verify that the 


requester is ATTACH. 


T 


cB 
« For STAR requests, verify that the 
TCR requester is a critical system task, 
and that no SCBs exist (for CREATE 
requests) or that only one STAR SCB 


exists (for OVERLAY requests). 


Parameter List 
Register 15 


« Check validity of parameter list Return codes: 


addresses. IEAVSTAO Invalid request to cancel or 


Tae overlay a nonexistent 
Kddcois ét-data tsi Are addresses within SCB = X'08! 
the bounds of the 


Invalid parameter list address 
= X'0C' 
Invalid exit or data list 
If errors are found in validity checking [[___________________________— per aie Soci ines 
Caller via STAI not issued by ATTACH 
SVC 3 = X'0C' 
(Continued at Step 5) STAI or STAR requested with exit 
address equal to 0 = X'0C' 
Invalid request to overlay an SCB 
belonging to another RB = X'10' 


region? 
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Diagram 8.43 (Step 4) STA Services Routine (Module IEAVSTAQ) 


Sa a a a a ac = —y-- 1 

[ROUTINE | l 
| NOTES | NAME [LABEL | 
| 4A The parameter list is paged in (if it is not in real |STA | FIXPARMS | 


storage) to avoid disabled missing page interruptions. |Services| 
The PREFIX subroutine enables the system (using MODESET) | | 
before referring to the page and forcing a missing page 
interruption. 


B RBINTCOD contains the ATTACH SVC number if the ATTACH 
routine is the requester. 


C TCBTID must be greater than 199 to represent a critical 
system task. 


The STAR SCB must te the first SCB on the queue. 


ee ee i 0 ee ee 


i a es ee 
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Diagram 8.43 (Steps 5-6) 
STA Services Routine 


Processing 


5 Get storage for CREATE SCB requests and 


queue the SCB: GETMAIN 
a iGCO04 


Obtain storage in 


subpool 255, 





6.1 


A. Queue STAE SCBs after the last 
STAI SCB, or first on the queue if 
there are no STAI SCBs. 


Output 


Find first non=STAI 
SCB. 





A 
p SCB Queue: 
s 


MBWARBAREBRARRASSE AREAS ERERRRRRMERT 





ae “ie hy ele 
a ee 


TCBSTABB 
B. Queue STAR and STAI SCBs as the 
first on the queue, MARRS SEE Sa Sa Gasaaaaaakaaaaanaan arg 


SCBCHAIN 


f°" gh & 
4 > 
A 


6 Initialize the new SCB and set the return Se 


code. See —e = SCB type 


SCBFLGS2 = key, mode, and 
—— XCTL type 
Caller via 
SVC 3 SCBOWNRA | = RB address for 


STAE; 0 for STAR; 
TCB address 
for STAI 


SCBEXIT = exit routine 
address 


= parameter 
list address 


Register 15 


| Return code = X'00' | code = X'00' 
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Diagram 8.43 (Steps 5-6) STA Services Routine (Module IEAVSTAO) 


SSS a SS re ee eee enna Gouna 1 
| | ROUTINE | 

| NOTES | NAME | LABEL | 

}---------------—------------___-- —- ----- + +--+ ff 

5 Overlay processing utilizes existing SCB storage. | STA | QOVERLAY | 

|Services | | 

5A The QPOINT subroutine locates the last STAI SCB on an | | FINDSTAI 


| 

| 

| SCB queue, and the first non-STAI SCB on a queue. If 

| there is no non-STAI SCB, QPOINT returns the address of 
| the last STAI SCB in both output parameters. If there 
| are no STAI SCBS, QPOINT returns the address of the 

| first SCB in both output parameters. Otherwise, the 
| 

[ 

| 

| 

| 

| 

t 


SCB is returned in the second output. 


es ee = ee 


| 
| 
| 
| 
| 
| 
| 
| 
| 
|QUESCB | 
i 


| 
| 
| 
address of the first STAE SCB or the address of the STAR| 
[ 
| 
| 
| 


| 
6 | | POVERLAY 


| 
G8 SB Na a aN a ee 
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Diagram 8.44 (Steps 1-8) 


ASIR Phase 1 
From ABEND (8.15) to schedul ‘ . 
STAE, STAI, or STAR user exit routine PrOCeSsing Output 


IGCOBOIC 


Input 


es 


Initialize ASIR resources, 







FREEMAIN 


ABBRANCH 
Free PIE, 









== 2 Prevent SPIE exits. 


TCBPIE#O —-l 





6.1 


RBASIR=1 


TCBSTCUR cael | 

| TCB 
TCBABGM=1 —- wr ee 
= TCBPIE=O 


Loe 3 If an ASIR recursion exists 


VALRECUR 


Check for valid ASIR 


recursion. 



























SCBOW NRA _ > | = GETMAIN ETMAIN 
Be 1 GMBRANCH 
| Get a register save 
area, ESA 
| 6.1 
~ SCBASYNC=1 | | 4 Set the Phase 1 indicator. 
l l TCB 
SCBFLGS1 | 5 Establish a new STA environment. TCBNSTAE=0 
| L 6 |f no SCB can be found for the 
| user exit routine FINDSCB 
| Find SCB containing 
l RB or TCB for this task, 
| RETABEND 
ABEND 
LL 7 Allow asynchronous exits if requested, a ee EE TCBFX=0 
Termination Interf ae Cree a 
L—— 8 if SCB is STAR, purge page-in by the —— 
TCB, and halt I/O. PURGEIO IEAPTERM 
id Purge page-in. 


2.07 






Determine type of I/O 
requested by user. 


SVCPURGE 
eal IGCOI6AP 
Halt I/O. 


(Continued at Step 9) 





Diagram 8.44 (Steps 1-8) ASIR Phase 1 (Module IEAVTMOB) 


ee tee ee eet teeta 


- 
| |ROUTINE 


1 ASIR is entered via an XCTL macro instruction from PREPHASE | 
ABEND. 

2 The PIE is freed to prevent SPIE exits for program PIETEST 

interruptions in the processing to follow: ABEND should 

ke invoked for program interrurtions. 


3  TCBSTCUR contains the ASIR recursion flag. The follcw- 
ing represent valid ASIR recursions. 


TSTRECUR 
GETSAREA 


e Failure during an attempt to purge I/O with the 
QUIESCE option. 


* Failure while attempting tc initialize the STAE 
work area prior to exit or retry. 


e Failure while attempting to update the ICB restore 
chain when closing data sets. 


¢ Failure while attempting to update SOWA information 
in the event that all IOBs are dequeued from the IOB 
restore chain, or a failure during IOB frocessing. 


e Failure during the closing of data sets associated 
with an RR or RBs keing purged. 


e Failure during the purge of enqueued resources prior 
to scheduling the STAR retry. 


prior to scheduling the STAR retry. 


e TCRARGM=1 means that storage can ke oktained from 
the WQA if the LSQA cannct satisfy a GETMAIN 
request. 


PHASE1 


5 Neither the recursion flag or the “33E ABEND" flag are 
reset in TCBNSTAE. This information must be saved for 
retry. 


6 SCROWNRA points to the RB of the STAE SCB, or the 
attaching task's TCB for STAI SCBs. 

7 If SCBASYNC=1, the user has requested that asynchren- GOODSCB 
ous exits te allowed. ABEND sets TCBFX to 1 to prevent 
asynchronous exits; TCBFX is reset to 0. 

8 SCBFLGS1, set with SCBSTAR, indicates a STAR SCB; set CALLPURG 

with SCBNOIOP, it indicates that I/O processing should 

ke bypassed; set with SCBHALT, it indicates that I/O 

shculd be halted. PURGEIO sets an I/O code in the ESA 

equivalent to the I/O codes in the parameter registers 
passed to the user's exit routine. (See the notes for 

Step 11.) For further information about the SVCPURGE 


routine, see OS/VS I/O Supervisor Logic. 
Gch ee ee ee ee ree 
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| 
| 
| 
| 
[ 
| 
[ 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
e Failure during the purge of unexpired timer elerents| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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| 
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! 
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Input 


= r* . cs > 
SCBSUPER=1 


SCBKEYO=1 








Processing 


Q Initialize the SOWA, 


10 Specify that the user exit routine 
should run with key 0 or in the 
supervisor state, if requested. 


11° Build parameters for the user exit 
routine. 


12 Pass control to the user exit routine. 


INITSDWA 


Obtain and initialize 


a work area. 





PVN NAN NAANANAN AAA 





SYNCH 


G 
IGCO12 er 


User exit routine 
via SVC 12 





Diagram 8.44 (Steps 9-12) 
ASIR Phase 1 


TCBSY NCH=1 
temas Obie 


Register 0 (if TCBSY NCH=1) 


won Address of SCB 


Register 1 


Address of work area or 
ABEND completion code 


Register 2 


User's exit parameter list 
if there is no work area, 
or 0 


Register 13 


Supervisor save area 
address if there is a 
work area, or 0 


Register 14 


Address of supervisor 
linkage instruction 


Register 15 


Address of user exit 
routine 
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12 The SYNCH routine gives control to the user exit 


iagram 8.44 (Steps 9-12) ASIR Phase 1 (Module IEAVTMOB) 


| RCUTINE 
NOTES | NAME 
9 e¢ If the user is in superviscr mode, the RB address cf |PHASE1 
the abnormally terminating program is entered into the| 
SDWA. The problem program PSW field in this werk area| 
is zeroed. 


e If the user is in froklem program mode, the name of 
the abnormally terminating program (or 0, if nct 
found) is entered into the SDWA. 


I/O codes set in register 0 (taken from the ESA code 
set by PURGIO in Ster 8): 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
X'O00*" - Active I/O at time of ABEND was quiesced and can| 
be restored. | 

X"O4U* - Active I/O at time of ABEND was halted and can _ | 
not be restcred. | 

X'08" ~ No active I/C at time cf ABEND. | 
X‘'OC* - No work area was oktained. | 
X10 - No I/O processing was rferformed. | 
| 

| 

| 

| 

| 

| 

4 


SYNCH 
routine using SYNCH (SVC 102). The user exit routine 

must branch on register 14 (which points to an SVC 3 
instruction) to return control to ASIR for a retry, or 

to complete ABEND processing. 


i a ec ee a ce ce ee ee eee ee te me ee ee ee a ee ee a i a ee 


SAVEINFO | 


SETPARMS 


nG9 


From user exit routine via SVC 3 
(EXIT) (3.14) to route control 
within ASIR to retry the failing 
program or not, as requested 


Input 


Register 15 


X'00' = no retry requested 
X'04' = retry with purge of 
RB chain 


X'08' = retry without purge 
of RB chain 

X'0C' - STAI retry requested 

X'10' - no further processing 
for STAI exits 
requested 





Diagram 8.45 











ASIR Phase 2 
Processing Output 
PHASEZ Ean 
1 Set the Phase 2 indicator. 
2 Prevent asynchronous exits. WWARAaBASaARAR RRA RAR RARE 
3 Free the register save area. y 
ie RMBRANCH y 
6.1| a 
4 Pass control to the appropriate 
routine: 
Code X'00': e@ If the SCB is a STAR, 
the user was unable to 
recover. RETABEND 
ABEND (8.14) SCB 

















Ti 
| cat eae 
SCBINUSE=0 
aes. 


4 


e Reset "in-use" flag 


for STAE SCBs. LABBEBABEEEEEERSE BEERS EE GEE 


e Schedule the next 
exit routine. 





ASIR Phase 1 (8.44) 


Code X'04': e Retry. ASIR Phase 3 (8 46) TCB 


Code X'08': @ If the SCB is o STAE ZUWUUBRBRERRRRRREREERRRRRRREE 


in supervisor mode 

retry. ASIR Phase 3 (8.46) 
e Schedule the next 

exit routine. 


ASIR Phase 1 (8.44) ESA 


Code X'10': e@ Indicate "prevent 
STAI processing." LIBRA BAREEEEEE EEE EEEEEE 


e Schedule the STAR 


exit routine. 


ASIR Phase 1 (8.44) 


Code X'0C': e Schedule the STAI 
exit routine. 


ASIR Phase 1 (8.44) 


All codes except X'00': If the SCB 
is a STAR, retry. ASIR Phase 3 (8.46) 


(Invalid codes are treated as code 


X'00') 
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Diagram 8.45 ASIR Phase 2 (Module IEAVTMOB) 
SAS SSSR Ser SS ee ae ee ee ee ee a “THOUTINE | 


ROUTINE | | 
| NAME [LABEL _| 


ee eee 


| 
4 If the task abnormally terminated with a 33E conditicn |PHASE2 

code, a retry is not performed; control is returned to | 

If control is routed to Phase 1, the work area| 
is freed if one was oktained. 
if control is passing to Phase 3. 


Phase 1. 


Testing for: 


code 
code 
code 
code 
code 


TCBNPURG, when set, means that a valid nc-purge request 


X'00' 
X'O4" 
x'08' 
x'Oc! 
X'10° 


+ 
{PHASE2 | PHASE2 


| 
CALLROUT 


| 
| 
| 
The work area is retained | | 
| 
| 
| 


ROUTPROC | ROUTPROC 
| PRG 
| NOPRG 
| PRG 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| QSTALEND] 
| 
| 
| 
4 


-— —— — — — — 


999 





From ASIR Phase 2 (8.45) to 


Diagram 8.46 (Steps 1-6) 
ASIR Phase 3 


schedule a user's retry routine Processing Output 
PHASE3 ESA 
1 Set the Phase 3 indicator. 


2 


Input 


TCBNPURG=1 3 


TCB 


| TCBDEB 5 





Reinitialize the work area, if one 


was obtained in Phase 1. INITSDWA 


ISGCOCOTC 


If no purge is indicated NOPURGE 


Build a retry PRB 












GMBRANCH 
Get storage for a PRB. 


(program request block). 
i 6.1] 
RB Queue: 
ier 


Find the RB to retry. FINDRB 


Close any DCBs related to RBs that 
will be purged in Step 6. Reset the 
Phase 3 indicator on return from 


PHASE4 PHASE4 


ld ESA 
Purge all RBs between the ASIR SVRB 


La nore 











Purge page-in requests. 


RBs being purged 
5.57 ise 


ips 
RBOPSW 
Gee, ee 


CVT 


(Continued at Step 7) 
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DLiagram 8.46 (Steps 1-6) ASIR Phase 3 (Modules IEAVTMOB and IEAVTMOC) 


NOTES | 


mc ee ee ee a ee ee ee ee ee ee we i ee ee we ee ee es ee ew oe ee oe 


1 The Phase 3 indicator is set as a debugging aid and to | 
indicate that INITSDWA should reinitialize the work 
area. 


2 INITSDWA branches to MODESET to enable the system. It 
performs processing similar to that done for Phase 1 
(initialization). Differences are that the user paran- 
eter list is checked for validity (if it exits; and the 
user is not in Supervisor state). If found to ke in- 
valid (it may have been modified Ly the exit routine) 
the SDWA is freed and an indicatcr is set meaning that 
the parameter list address is invalid and no retry is 
allowed. Otherwise, the address of the first IOF cn the 
restore chain (or if no I/O is restorable) is placed 
into word 2. Word 26 of the work area is set to point 
to word 2 (0 if no I/O is restorable). The name and 
entry point of the abnormally terminating frogram are 
placed in the work area as in Phase 1. Before returning 
to mainline Phase 3, INITSWA issues the MOLDESET SVC to 
disakle the system. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
[ 
| 
| 
| 
| 
3 iIGcO0c0ic (the second load module of ASIR) is entered via| 
an XCTL macro instruction. ICENPURG=1 means to retry | 
without purging RBs; TCBNPURG is set in Phase 2. | 
| 

| 

| 

[ 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

1 


4 FINDRB selects the retry RB: 
e® For STAR, RB pointing to the TCB 
e For STAE, RB pointed to Ly SCBOWNRA 


e For STAI, PRB whose RBLINK field points to the most 
recent ASIR Phase 1 SVRB. If such a PRB does not 
exist, the newest PRB older than the oldest non-FPRB 
on the RB queue is used. 


5 TCBDEB contains the address of the first DEB, or 0, if 
there are no DEBs. 


6 For Phase 3 processing, to ensure that correct register 
contents are passed to the retry routine acress the SVC 
3 Exit interface, PURGERB must consider the current 
ASIR SVRB as one of the RBs being rfurged. 


Wie RG ee a) me en SE RE Pe Be Ne Tg he at Let ep eae page Meare oe mere tae gh Be ps Hl Tet he ee ~T 


ROUTINE 
NAME 


— ee ee 


fee ee es ee ee 


8S9 


Processing 


7 Indicate RBs purged. 


8 Initialize the retry RB pointer. 


Q Cancel pending messages. 


10 For STAR retries 


11 Set retry wait count and wait flags 
to 0; allow asynchronous 
interruptions, 


12 Remove SCBs not eligible for retry. 


Input 


CVT 


CVTQMSG —-t——t13 Cancel problem determination 


messages. 


Set parameters to be used by the 
retry routine. 


Diagram 8.46 (Steps 7-14) 
ASIR Phase 3 



























| WTOR Purge | | WTOR Purge | 
|” TEECVPRG 
me) ENG Manuel ors Manual | ENQ Manual Purge | 
el ENQ requests .| 


Purge Timer 


| Purge Timer | 
|” [TEAQPGTM 


Purge timer queve 
elements. 8.7 





User exit routine 








RBXWAIT=0 


BRBABRBABABaaaaaaa RBECBWT=D 





Set eligible SCBs not 
"in use", 






SCBINUSE=1 


INFO 


LARRRAWRABa Ba aaaaaa INFTCB=0 





Register 1] 


Work area address 
or ABEND code 


X'00' - Area exists 
X'0C' - No area obtained 


Register 2 


Register 14 
User's retry routine 


via SVC 3 Supervisor linkage 


instruction address 


Address of first I/O 


block on the restore 


chain (if no work area) Reablenls 


Address of user retry 
routine 
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Diagram 8.46 (Steps 7-14) ASIR Phase 3 (Module IEAVTMOC) 

BS ee ee ee i 5 ea ea fo 1 
| ROUTINE | 

| NOTES | NAME [LABEL _ | 


+ | 
PHASE3 |WTORPRG | 

| STARPRG 

| TIMERPRG | 


9 See OS/VS2 Job Management Logic for further 
information about the WTOR Purge routine. 


11 The TCBABGM flag is turned off to allow allccation only 
from the LSQA. 


ASYNCHON | 


| | 
| | 
| l 
| | 
| | 
| | | 
| | | 
{12 In CLEANUP processing, if the retry is from a STAE exit | | 
| routine, the STAE SCB is dequeued from the SCB chain and | | 
| the SCB storage is freed. If the retry is from a STAI | | 
| exit, the in-use bit is reset in the STAI SCB. If the | | 
| retry is from the oldest STAI exit, the in-use rit is | 
| reset in any STAI SCEs on the SCB queue for which the | | 
| in-use bit has been previously set and not already | 
| reset. If it is a STAR retry, STAI in-use bits are | | 
| reset as above in addition to resetting the STAR SCB | 
| in-use bit. | | 
| | 
119 Messages to Ee canceled were stored by type-1 SVC | | 
| routines. | | 
| | | 
| | 
| | | 
| | | 
| | 
| | | 
i 


| 
| 
| 
| 
| 


CVTOMSG points to a list of message entries. 


14 The work area now contains the address of the first I/0 
block and the address of the IOB restore chain if there 
is an IOB restore chain in both cases. 


oe a ae es eee eee | 


099 





From ASIR Phase 3 (8.46) to close DCBs z 
related to RBs that Phase 3 will purge Processing 


PHASE4 


Input 


1 Set the Phase 4 indicator. 


RB being purged 


2 For STAR SCBs, set the ABEND-in- 
progress flag. 


3 Any DCBs within the bounds of the 
extent list must be closed: 


Extent list 


A. Dequeve all IOBs with addresses 
matching DCBs to be closed. 


B. Close DCBs, 


If CLOSE processing fails 


4 Disable the system. 





BOUNDTST 


Pass address of DCB 
from DEB and extent 
list, 


IEAMO DBR 


IOBPROC B | MO DESET 


FORCLOSE 





Force clasing of DCBs 
by dequeving DEBs. 


(Enable) 


MODESET 


IEAMODBR 


(Disable) 
3.21 





ASIR Phase 3 (8.44) 





Diagram 8.47 
ASIR Phase 4 


Output 
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Diagram 8.47 ASIR Phase 4 (Module IEAVTMOC) 


Dn igre Nae a et ee ae ag oy eee ogee ee ee ag ee a ee Ce apenas aie, a 


wo 


ed 


The Phase 4 indicator is set as a debugging aid. 


Setting TCBFA causes the CLOSE routine to bypass its 
normal wait for an ECB to be posted. 


| 
| 
| 
| 
For STAR SCBS, all DCBs are closed, not just those | 
within the bounds of the extent list. DCBs are closed | 
for RBs between the ASIR SVREB and the retry RB. In IOB-| 
PROC the IOBDCB field of each IOB on the restore chain | 
is compared to the address of the DCB that is to be | 
closed. If a match is found, that IOB is dequeued from | 
the restore chain so that a retry routine will nct later| 
attempt to restore the IOB for a DCB which has been 
closed. (The CLOSE routine manipulates other IOE chains | 
for the DCB that is Lteing closed.) Each time a match is| 
found on the first IOB on the restore chain, the start | 
address of the restore chain is updated. When a match | 
is found on the only IOB remaining on the restore chain, | 
the "no-I/O0-restorable™ indicator is set in the extended | 
Save area Of ASIR's SVRB and the same field in the SLWA 
is updated (if an SDWA exists). (Information about the 
IOB restore chain is passed to the user retry routine 
via the work area or parameter registers.) 





| 
| 
| 
| 
| 
IOBPROC enables the system to avoid missing page | 
interruptions. | 
| 
| 
| 
4 


For further information about the CLOSE routine, see 
OS/VS OPEN/ CLOSE/ EOV Logic. 


sc ce ce ae ce ee ee a ee a ee re ee ee ee ee es ew ee = 


ROUTINE | 
NAME | LABEL 


PHASEY' |PHASE4 


| ALLCLOSE 


| CLOSEDCB | 
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Section 9: Glossary 663 


S 


This glossary defines VS2 terms and 
abbreviations as they are used in this 
manual. This glossary does not include all 
terms previously established by the IBM 
System/360 Operating System. If you do not 
find the term you are looking for in this 
glossary, refer to the index in this book 


or to the IBM Data Processing Glossary, 
GC 20-1699. 


REFERENCE WORDS USED IN THE ENTRIES 


The following reference words are used 
in this glossary: 


Reference 
Words 


Meaning 
Contrast with 


Refers to an opposed or 
substantively different 
term. 


Preferred term Indicates that a term is 

is still in use but that a 
preferred term exists and 
is defined. 


Less preferably 
called 


Indicates a synonymous 
term is still in use but 
is less prevalent than the 
preferred term. 


See Refers to multiple-word 
terms that have the same 
last word. The other 
terms may or may not be 
related to the entry in 
which the reference 
appears. 


Refers to related terms 
that have a similar, but 
not synonymous, meaning. 


See also 


WHAT VS2 TERMS AND ABBREVIATIONS MEAN 


Synonymous with Lists equally acceptable 
terms. 


ACKNOWLEDGMENT TO THE AMERICAN NATIONAL 
STANDARDS INSTITUTE 


IBM is grateful to the American National 
Standards Institute (ANSI) for permission 
to reprint its definitions from the Ameri- 
can National Standard Vocabulary for Infor- 
mation Processing (Copyright 1970 by Ameri- 
can National Standards Institute, Incor- 
porated), which was prepared by Subcommit- 
tee X3.5 on Terminology and Glossary of 
American National Standards Committee X3. 


ANSI definitions are indicated in these 
ways: 


e An asterisk preceding the first item 
number indicates that all definitions 
for that term are ANSI definitions. In 
this case, the asterisk appears like 
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GLOSSARY 


ABDAREA: ABDUMP work area. 


ABDPL: ABDUMP subcomponent parameter list. 
ABDUMP: A dump taken during abnormal ter- 
Mination of a task. Also the name of a 
routine that produces the dump. 


ABDUMP subcomponent parameter list (ABDPL): 
An area used for communication with the 


TCAM, TSO, and SWA dump- formatting 
routines. 


ABDUMP work area (ABDAREA): A work area 
that contains pointers, buffers, flags, and 
counters used by the ABDUMP routines. 


ABEND: Abnormal end of task. Also the 
abbreviated name of a routine that performs 
the abnormal ending of a task and that 
task's incomplete subtasks. 





abnormal end of task: Termination of a 
task prior to normal completion because of 
an error condition. Abbreviated ABEND. 


abnormal termination: 
of task. 


Same as abnormal end 


active page: A page in real storage that 
can be addressed. 


active page queue: One of four queues of 
pages that are in real storage that are 


currently assigned to tasks. Pages on 
these queues are eligible for placement on 
the available page queue. A separate 
active page queue isS maintained for all 
active pages that have a particular confi- 
guration of the reference and change bits 
(0,0: 0,13 1,0; 1,1). See also available 


page queue, hold page queue. 


address translation: The process of chang- 
ing the address of an item of data or an 
instruction from its virtual address to its 
real storage address. See also dynamic 
address translation. 


alias: (1) * An alternate label. For 
example, a label and one or more aliases 
may be used to refer to the same data ele- 
ment or point in a computer program. (2) 
An alternate entry point established within 
a module during linkage editor processing; 
an alias name is available to the control 


program before the module is loaded. Con- 
trast with embedded entry point. 
allocate: To assign a resource for use in 


performing a specific task. 
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allocated queue element (AQE): A VSS con- 


trol block containing the size of a block 
of allocated storage in subpool 233, 234, 
243, 244, 253, or 254. 


antecedent task: Synonymous with 
related higher-level task. 


APF: Authorized program facility. 

APG: Automatic priority group. 

APGCE: Automatic priority group control 
element. 

AQE: Allocated queue element. 

ASIR: ABFND/STA Interface routine. 


asynchronous: Without regular time rela- 
tionship; unexpected or unpredictable with 
respect to the execution of a program's 
instructions. Contrast with synchronous. 


asynchronous exit queue: A queue contain- 
ing queue elements that represent requests 


for exit routines (including data manage- 
ment exit routines) and requests for asyn- 
chronous control program services that must 
be executed under a user TCB because a dis- 
abled routine may cause a page fault. 
Building the asynchronous exit queue is a 
scheduling phase performed by the Stage 2 
Exit Effector. 
attaching task: Synonymous with originat- 
ing task. 


authorized program facility (APF): A gen- 
eral term for supervisor coding that limits 


the use of critical functions and resources 
to authorized users. Testing for authori- 
zation is done by TESTAUTH, a type-1 SVC 
routine. TESTAUTH compares an authoriza- 
tion code, which the linkage editor assigns 
to every module, against a function code 
whenever a task attempts to uSe a 
restricted resource or function. 


automatic priority group (APG): A group of 
tasks at a single priority level that are 


dispatched according to a special algorithm 
that attempts to provide optimum use of CPU 
and I/O resources by these tasks. See also 


dynamic dispatching. 


automatic priority group control element 
(APGCE): A control element used to control 


the dispatching of tasks in an automatic 
priority group. 
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auxiliary storage: Data storage other than 
real storage (and including external page 
storage). 


auxiliary storage allocation gueve: In 
paging supervision, a queue on which a PCB 
is placed to await the assignment of an 
external storage slot so that the page can 
be paged out. 


auxiliary storage management: A general 
name used for routines in the paging super- 


visor that control external page storage. 


available frame count: A count of page 
frames that are ready for reassignment. 


available page queue: A queue of the pages 
whose real storage is currently available 


for allocation to any task. See also 
active page queue, hold page queue. 


basic control (BC) mode: A mode in which 
the features of a System/360 computing sys- 
tem and additional System/370 features, 
such as new machine instructions, are 
operational on a System/370 computing sys- 
tem. See also extended control (EC) mode. 
BC mode: Basic control mode. 

BLDL table: A table of track addresses for 
a user-Specified list of modules on the 
link library (SYS1.LINKLIB). The purpose 
of the table is to reduce the time required 
to find the listed modules on SYS1.LINKLIB. 
In VS2, the user can specify that this 
table is to be either paged or fixed; when 
the table is on fixed pages in lower real 
storage, it is called a fixed BLDL table. 


blocking: Combining two or more logical 
records into one physical record. 


branch-entry fix-delay queue: In paging 
Supervision, a queue on which fix requests 


(received through branch entries to the 
FIX/LOAD routine) are placed when they can- 
not be processed because the amount of fix- 
able real storage has fallen below a speci- 
fied minimun. 


BSAM: Basic sequential access method. 


CCW translation: Preferred term is channel 
program translation. 


CDE: Contents directory entry. 

change bit: A bit associated with a page 
in real storage; the change bit is turned 
on by hardware whenever the associated page 
in real storage is modified. In VS2, there 
is a change bit in each of two storage keys 
associated with each frame; if either bit 
is on, the entire page is considered to 
have been modified. 


channel program queue: A queue is the nuc- 
leus containing channel programs used by 


the paging supervisor for paging 
operations. 


channel program queue element (CPQE): A 


control element in the nucleus that con- 
tains a channel program used by the paging 
supervisor. 


channel program translation: In a channel 
program, replacement by the software of 


virtual addresses with real addresses. 
Less preferably called CCW translation. 


clock comparator features: A System/370 CPU 
feature used to cause an external interrup- 


tion when the time-of-day clock reaches or 
passes a specified value and the CPU is 
enabled for clock comparator interruptions. 
A value is placed in the clock comparator, 
and when the time-of-day clock reaches that 
value, the interruption occurs. 


clock comparator queue: The queue of timer 
queue elements (TQEs) representing requests 


for REAL and WAIT timing. Each TQE con- 
tains an interval; the interval contained 
in the TQE at the head of this queue is 
placed in the clock comparator. 


communications vector table (CVT): A major 
table in the system nucleus that contains 
addresses and other data needed and used by 
various supervisor routines. 


contents directory: A group of queues that 
indicate the routines that are present in 


virtual storage. Includes the link pack 
area queue, job pack area queue, and time 
sharing link pack area queue. 


contents directory entry (CDE): A control 
entry that represents a module in the jok 


pack area. The entry describes the module 
and contains a pointer to its entry point. 
If an emkedded entry point was established 
in the module by an IDENTIFY macro instruc- 
tion, there are two CDEs for the module. 
One, the major CDE, contains the main 
entry-point address; the other, the minor 
CDE, contains the entry-point address for 
the embedded entry point. 


control registers: A set of registers used 
for operating system control of relocation, 
priority interruption, program event reco- 
rding, error recovery, and masking opera- 
tions. Contrast with general-purpose 


registers. 
CPOE: 


CPU timer: A System/370 timing device used 
for TASK timing. It is a 64-bit decrement— 
ing binary counter. On the basis of a pro- 
gram request, a Linary time interval is 

placed in the counter. A one is subtracted 


Channel program queue element. 
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from bit position 51 of the counter every 
microsecond. An external interruption 
occurs when the value placed in the CPU 
timer reaches or becomes less than zero if 
the CPU is enabled for CPU timer 
interruptions. 


CPU timer queue: The queue of timer queue 
elements (TQEs) representing requests for 

TASK timing. Each TQE contains an interv- 
al, and the interval contained in the TQE 

at the head of this queue is placed in the 
CPU timer. 


CVT: Communications vector table. 

default device: A paging device from which 
a page slot is to be assigned for a page- 
out operation when a particular device has 
not been specified in the page-out request. 


deferred allocation: A condition in which 
the allocation of pages for a region must 
be delayed because all needed pages are not 
immediately available. 


delayed posting queue: In paging supervi- 
sion, a queue on which a PCB is placed when 


a paging operation has been completed but 
the completion cannot be posted immediately 
because the system is handling a disabled 
page fault. 


demand paging: Transfer of a page from 
external page storage to real storage at 
the time it is needed for execution. 


dequeue: (1) To remove a program from a 
list of programs awaiting use of a system 
service or resource. (2) To remove a con- 
trol block or data entry from a queue of 
control blocks or data entries. (3) Con- 
trast with enqueue. 

| 
descendant task: 
subtask. 


Synonymous with related 


descriptor queue element (DQE): A VSS con- 
trol block that describes a storage block 


of 4K or more bytes within a subpool. 


device number: A part of an external page 
address that refers to a particular paging 
device; together with a group number and a 
Slot number, it identifies the location of 
a page in external page storage. 


directed page-out: A page-out operation in 
which the page slot is to be assigned from 


a paging device specified in the page-out 
request (rather than from a default 
device). 


disabled: Pertaining to a state of the CPU 


that prevents the occurrence of certain 
types of interruptions. 
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disabled code: A section of code that can- 
not be interrupted by specific types of 
interruptions. 


disabled page fault: A page fault that 
occurs when I/O and external interruptions 


are disallowed by the CPU. 


dispatch: To place into execution. See 
also task switching. 


dispatching priority: A number assigned to 
each task, used to determine the order in 


which that task will use the CPU in rela- 
tion to other tasks in the system. See 


also limit priority. 


dormant state: A state in which the active 
pages of a job have been paged out. 


DQE: Descriptor queue element. 
DSS: Dynamic support system. 
dump: * (1) To copy the contents of all or 


part of a storage, usually from an internal 
storage into an external storage. (2) A 
process as in (1). (3) The data resulting 
from the process as in (1). 


dynamic address translation (DAT): (1) The 
process of changing a virtual storage 


address to a real storage address during 
execution of an instruction. See also 
address translation. (2) A hardware fea- 
ture that performs the translation. 


dynamic allocation: Assignment of system 
resources to a program at the time the pro- 
gram is executed rather than at the time it 
is loaded into storage. 


dynamic area: The portion of virtual 
storage that is divided into regions that 
are aSsigned to job steps and system tasks. 


See also pageable dynamic area, non- 
pageable dynamic area. Contrast with non- 
dynamic area. 


dynamic dispatching: A facility that 
assigns priorities to tasks within an auto- 


matic priority group to provide optimum use 
of CPU and I/O resources. 


dynamic dump: A dump that is performed 
during the execution of a computer program. 


dynamic support system (DSS): An interac- 
tive dekugging facility that allows 


authorized maintenance personnel to monitor 
and analyze events: and alter data. Infor- 
mation for DSS is included for planning 
purposes only. 


ECB: Event control block. 
EC mode: Extended control mode. 
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embedded entry point: An alternate entry 
point established within a module by means 
of the IDENTIFY macro instruction after a 
module has been loaded into virtual 
storage. Contrast with alias. 


enabled: Pertaining to a state of the CPU 
that allows the occurrence of certain types 
of interruptions. Synonymous with 


interruptable. 


enabled code: 
by the CPU. 


Code that can be interrupted 


enabled page fault: A page fault that 
occurs when I/O and external interruptions 


are allowed by the CPU. 


engueue: (1) To add a program to a list of 
programs awaiting use of a system service 
or resource. (2) To add a control block or 
data entry to a queue of control blocks or 
data entries. (3) Contrast with dequeue. 


event control block: A control block used 
to represent the status of an event. 


extended control (EC) mode: A mode in 
which all the features of System/370 com- 
puting system, including dynamic address 
translation, are operational. See also 
basic control (BC) mode. 


extent list (XTLST): A control element 
that shows the address and length of each 
module in virtual storage. 


external page: A page located on external 


page storage. 


external page address: An address that 
identifies the location of a page in a page 


data set. In VS2, the address consists of 
a relative device number, a relative group 
number, and a relative slot number. 


external page storage: The portion of 
auxiliary storage that is used to contain 


pages. 


external page table (XPT): An extension of 
a page table that identifies the location 


on external page storage of each page in 
that page table. 


external page table entry (XPTE): An 
entry, in an external page table, that 


associates a virtual storage page with the 
actual page on an auxiliary storage device. 


FBQE: 


fix ownership element (FOE): A control 
element that represents a page that has 


been fixed by the task to whose TCB the FOE 
is chained. 


Free block queue element. 


fixed BLCL table: 


fixed: In OS/VS, not capable of being 
paged out. See also long-fixed, normal- 


fixed, short-fixed, and’ page fixing. 


A BLDL table that the 
user has specified to be fixed in the lower 
portion of real storage. 


fixing: See page fixing. 


fixed link pack area: An extension of the 
link pack area that occupies fixed pages in 
the lower portion of real storage. A rou- 
tine in the fixed LPA is used in preference 
to a copy of the same routine in the page- 
able LPA. The routines in the fixed LPA 
are densely packed without regard for page 
koundaries. 


fixed page: A page in real storage that is 
not to ke paged out. 


FLIH: First-level interrurtion handler. 
FOE: Fix ownership element. 

FQE: Free queue element. 

frame: Same as page frame. 


frame number: In VS2, the part of a real 
Storage address needed to refer to a frame. 


See also page number. 


frame takle: Same as page frame table. 


frame takle entry (FTE): An entry in the 
page frame table that describes how a frame 


is being used. 


free block queue element (FBQE): A VSS 
control Elock that describes 4K blocks of 


storage not yet assigned to a subpool. 


free queue: In paging supervision, a queue 
on which a PCB is placed when a request for 
a paging service has been completely satis- 
fied and this PCB is no longer needed. The 
PCBs on thiS queue are available for use in 
handling other requests for paging 
services. 


free gueue element (FQE): A VSS control 
block that describes the unallocated 


storage within the space defined by a 
descriptor queue element (DQE). 


FTE: Frame table entry. 


general-purpose registers: A set of regis- 


ters available to any program running ina 
CPU. Contrast with control registers. 


generalized trace facility (GIF): A trac- 
ing program that monitors and records sys- 


tem events. It may be turned on and off by 
the operator and manipulated by the ter- 
Mination routines. 


Section 9: Glossary 669 


GOVRFLB: The primary VSS control block. 
It defines SQA and LSQA quickcell require- 
ments and contains data needed for initial 
Supervision of virtual storage. 


group: See slot group. 


group number: In VS2, a part of an extern- 
al page address that refers to a slot 
group; together with a device number and a 
Slot number, it identifies the location of 
a page in external page storage. 


GTF: Generalized trace facility. 


hold page queue: A queue to which pages in 
real storage are initially assigned through 
operations such aS page-in or page reclama- 


tion. See also active page queue, avail- 
able page queue. 


INFOLIST: Type-1 SVC message table. 


initial program loader (IPL): A program 
that loads the control sections of the con- 


trol program into real storage. 


initial program loading: A combined 
hardware/software operation that clears 


real storage and loads the control sections 
of the control program into real storage. 
The hardware portion of the operation 
Starts a read operation from a designated 
input device; the IPL program then uSes a 
bootstrap program to load itself into real 
storage. Abbreviated IPL. 


initiating task: The job management task 
that controls the selection of a job and 
the preparation of the steps of the job for 
execution. Less preferably called initia- 
tor task. 


interception: In paging supervision, the 
process of seizing a page frame that was 
being used for a non-V=R purpose and is 
needed to complete a requested V=R region. 
The PFTE (page frame table entry) for the 
frame was previously marked so that the 
frame would be seized when it was released 
from its non-V=R use. See also V=R inter- 


cepted page. 


interregion posting: The process by which 
the POST routine indicates to a swapped-out 


TSO routine that an awaited event is com- 
plete. The POST routine passes control to 
TSO's TSIP (Time Sharing Interface Program) 
to swap in the user. Execution of the POST 
routine is then requested by the Region 
Control Task of TSO. 


interruption queue element (IQE): A con- 
trol element used by the Stage 2 and Stage 


3 Exit Effectors to schedule the execution 
of an end-of-task exit routine (ETXR). 
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interruption request block (IRB): A con- 
trol block that represents a routine that 


must be executed because of the occurrence 
of an asynchronous interruption or event. 
interval: A predetermined time period. 
interval read count: A count of the number 
of page-in operations that are requested 
during a specified interval. The count is 
calculated by the task disablement 
algorithm in paging supervision. 


interval reclaim count: A count of the 
number of pages that, during a specified 
interval, have been reclaimed from the 
availakle page queue or have been reclaimed 
during preliminary page-out processing. 

The count is calculated by the task dis- 
ablement algorithm in paging supervision. 


interval swap~-in count: A count of the 
number of page-in requests that were 


required by swap-in operations during a 
specified interval. The count is calcu- 
lated by the task disablement algorithm in 
paging supervision. 


invalid page: A page that cannot be 
directly addressed by the dynamic address 
translation feature of the CPU. 


I/O_active queue: In paging supervision, a 
queue on which a PCB is flaced whenever a 
page-out or page-in operation has been 
Started to satisfy a request represented by 
the PCB. 


IPL: Initial program loader. 

IRB: Interruption request block. 

IQE: Interruption queue element. 

JCT: Jok control table. 

JFCB: Job file control block. 

job: A collection of related problem pro- 


grams, identified in the input stream by a 
JOB statement followed by one or more 
execute (EXEC) and data definition (DD) 
statements. 


jok pack area (JPA): The two subpools (251 
and 252) in a given region of virtual 
storage into which executable programs are 
loaded. 


job pack area queue (JPAQ}): A queue con- 


taining the contents directory entries 
(CDEs) for problem programs running in the 
job pack area subpools of a region. 


job step: (1) * The execution of a comput- 
er program explicitly identified by a job 

control statement. A job may specify that 
several job steps be executed. (2) A unit 
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of work associated with one processing pro- 
gram or one cataloged procedure and related 
data. A job consists of one or more job 
steps. 


job-step task: (1) A task that is 
initiated by an initiator/terminator in 
accordance with specifications in an 
execute (EXEC) statement. (2) A subtask of 
a job-step task whose job-step pointer 
points to itself. 


limit priority: A priority specification 
associated with each task, representing the 
highest dispatching priority that the task 
can asSign to itself or to any of its sub- 


tasks. See also dispatching priority. 


link pack area (LPA): An area of virtual 
storage that contains selected reenterable 


and serially reusable routines that are 
loaded at NIP time and can be used concur- 
rently or serially by all tasks in the sys- 
tem. In VS2, a link pack area can ccnsist 
of a pageable LPA only, or of a pageable 
LPA and a fixed LPA. See also pageable 


link pack area and fixed link pack area. 


link pack area directory: A directory that 
contains an entry (LPDE) for each entry 


point in all modules in the link pack area. 


link pack area library (SYS1.LINKLIB): A 
partitioned data set that contains the 


modules specified to be in the link pack 
area. 


link pack area queue: A queue that con- 
tains a contents directory entry (CDE) for 


each link pack area module currently in 
use, for each module in the link pack up- 
date area, and for each module in the fixed 
link pack area. In searching for a 
requested module, the system searches this 
queue before it searches the link pack area 
directory. 


link pack update area: An area in virtual 
storage that contains modules that are 


additions to or replacements for link pack 
area modules for the current IPL. 

LLE: Load list element. 

load list: The chain of load list elements 


that represent the modules that have been 
loaded into a task"s job pack area. 


load list element (LLE): A control element 
created for each module loaded into a 
region's job pack area by the LOAD routine. 
The LLEs for each task in a job step are 
chained together to form the load list for 
that task. Each LLE points to a contents 
directory entry for the loaded module. 


local system queue area (LSQA): One or 


more segments associated with each virtual 


storage region that contains job-related 
system control blocks. 


lock/unlock facility: A supervisor facility 
that controls the execution of instruction 
Strings when a disabled page fault occurs. 


long-fixed: Pertaining to a request to fix 
cne or more pages for a relatively long 
time. 


LPA: Link pack area. 
IPDE: Link pack directory entry. 
LSQA: local system queue area. 


low threshold: In paging supervision, the 
Ninimum number of page frames that can be 
availakle kefore the system takes action to 
acquire additional unoccupied frames. 


message buffer: A structured buffer area 


used for building and writing system 
messages. 


See page migration. 
A PCB representing a page 


migration: 


migration PCB: 
to be migrated. 


migration queue: In paging supervision, a 
queue on which a PCB is placed whenever a 
page must Le moved from a primary to a 
secondary paging device to make paging more 
efficient. 


WisSing page interruption: See page fault. 
must-complete status: See step must- 


complete status and system must-complete 
Status. 


NIP: Nucleus initialization program. 


nondirected page-out: A page-out operation 
in which the page slot is to be assigned 


from a default device (rather than from a 
particular device specified in the page-out 
request). 


nondynamic area: The area of virtual 
storage assigned to the resident portion of 
the control program (the nucleus and the 
link pack area). Contrast with dynamic 
area. 


nonpageakle dynamic area: An area of vir- 
tual storage whose virtual addresses are 


identical to real addresses; it is used for 
programs or parts Of programs that are not 
to ke paged during execution. Less prefer- 


rably called V=R dynamic area. 


nonpageable region: A subdivision of the 
nonpageable dynamic area that is allocated 
to a job step or system task that is not to 
ke paged during execution. In a nonpage- 
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able region, each virtual address is ident- 
ical to its real address. Less preferably 


called V=R_ region. 


normal-fixed: Pertaining to a request to 
fix one or more pages for an average period 
of time. 


nucleus initialization program (NIP): The 
program that initializes the resident con- 


trol program. It allows the system opera- 
tor to request last-minute changes to cer- 
tain options specified during system 
generation. Abbreviated NIP. 


Originating task: The task that is attach- 
ing or did attach a particular subtask. 


Synonymous with attaching task. 


overlay seqment: A user-determined portion 
of a program that has been divided so that 
the portions can be consecutively loaded 


into virtual storage and executed. Con- 
trast with segment. 
overlay segment table (SEGTAB): A table 


used by the overlay supervisor to record 
the use of overlay segments. Contrast with 
segment table (SGT) used in dynamic address 
translation. 


page: (1) A fixed-length biock of instruc- 
tions, data, or both, that can be trans- 


ferred between real storage and external 
page storage. In VS2, a page consists of 
4K bytes. (2) To transfer instructions, 
data, or both between real storage and 
external page storage. 


page control block (PCB): A control block 
that indicates the status of a paging requ- 


est, and is used to control the movement of 
a paging request among the various modules 
of the paging supervisor. 


page data set: A data set in external page 


Storage, in which pages are stored. 
page fault: A program interruption that 


occurs when a page that is marked “not in 
real storage” is referred to by an active 


page. Synonymous with page translation 
exception. 


page fixing: Marking a page as nonpageable 
so that it remains in real storage. 


page frame: A block of real storage that 
can contain a page. Synonymous with frame. 


page frame table (PFT): A table that con- 
tains an entry for each frame. Each frame 


table entry describes how the frame is 
being used. 


page frame table entry (PFTE): A control 
element that reflects the status of a page 


frame. 
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page-in: The process of transferring a 
page from external page storage to real 
storage. 


page I/O initiation gueue: In paging 

Supervision, a queue on which a PCB is 
placed to await the starting of an I/O 
Operation required for the page-out or 
fFage-in request represented by the PCB. 


page migration: The transfer of pages from 
a primary paging device to a secondary pag- 
ing device to make more space available on 
the primary paging device. 


page number: The part of a virtual storage 
address needed to refer to a page. See 
also frame number. 


page-out: The process of transferring a 
page from real storage to external page 
storage. 


page reclamation: The process of making 
addressakle the contents of a page in real 
Storage that has been marked invalid. Page 
reclamation can occur after a page fault or 
after a request to fix or load a page. 


page takle (PGT): A table that indicates 
whether a page is in real storage and 
correlates virtual addresses with real 
storage addresses. 


page takle entry (PTE): An element in the 
page takle that represents a page in real 


storage. 


page translation exception: A program 
interruption that occurs when a virtual 


address cannot be translated by the hard- 
ware because the invalid bit in the page 
table entry for that address is set. 
Synonymous with page fault, program inter- 
ruption code 17. See also segment transla- 
tion exception, translation specification 
exception. 


page vector table (PVT): The central con- 
trol block for the paging supervisor. 


page wait: A condition in which the active 
request block for a task is placed ina 
wait state while a requested page is 
located in real storage or is brought into 
real storage. 


pageable dynamic area: An area of virtual 
Storage whose addresses are not necessarily 


identical to real addresses; it is used for 
programs that can be paged during execu- 
tion. Less preferably called V=V_ dynamic 
area. 
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pageable region: A subdivision of the 
pageable dynamic area that is allocated to 
a job step or system task that can be paged 
during execution. Less preferably called 


V=V_region. 


paging: The process of transferring pages 
between real storage and external page 
storage. 


paging device: A direct access storage 
device on which pages (and possibly other 
data) are stored. 


paging device information table entry 
(PDITE): A control entry used by the pag- 


ing supervisor to identify the characteris- 
tics and status of a paging device. There 
is one PDITE for each paging device. 


paging device table entry (PDTE): A con- 
trol entry used by the paging supervisor to 


locate specific pages on a paging device. 


paging rate: The average number of page- 
ins and page-outs per unit of time. 


paging Supervisor: A part of the supervi- 
sor that allocates and releases real 


Storage space (page frames) for pages, and 
initiates page-in and page-out operations. 


partition gueue element (PQE): A VSS con- 


trol block that heads a chain of control 
blocks that describe unallocated storage 
Space for an entire region, an LSQA, or the 
SQA. 











PCB: Page control block. 

PcI: Program-check interruption. 
PDITE: Paging device information table 
entry. 

PDTE: Paging device table entry. 

PER: Program event recording. 

PFT: Page frame table. 

PFTE: Page frame table entry. 

PICA: Program interruption control area. 
PIE: Program interruption element. 
PGT: Page table. 

PQE: Partition queue element. 

PRB: Program request block. 


primary paging devices An auxiliary 
storage device that is used in preference 


to secondary paging devices for paging 
operations. Portions of a primary paging 


device can be used for purposes other than 
paging operations. 


priority: A dispatching priority and a 
limit priority for each task resides in the 
task‘s TCB. The dispatching priority 
determines the appropriate position of the 
TCB in the TCB queue; the limit priority is 
used by the CHAP routine to determine the 
maximum increase possible for the dispatch- 
ing priority. See also dispatching priori- 
ty and limit priority. 


problem state: A state during which the 
CPU cannot execute input/output and other 
privileged instructions. Contrast with 


supervisor state. 


program event recording (PER): A hardware 
feature used to assist in debugging fro- 


grams by detecting program events. 


program interruption code 16: Same as seq- 


rent translation exception. 
program interruption code.17: Same as page 
translation exception. 


program interruption code 18: Same as 
translation specification exception. 


program interruption control area (PICA): 
A control block used to control the execut- 


ing of a user exit routine that was speci- 
fied in a SPIE macro instruction. 


program interruption element (PIE): A con- 
trol element created when a SPIE macro 


instruction is used to specify that an exit 
routine is to process a particular type of 
program-check interruption. 


program request block (PRB): A request 
block that represents a nonsupervisory 


module or routine that is to be executed on 
behalf of a task. 


PTE: Page table entry. 
purge: To remove program elements or con- 


trol information from a system. 


PVT: Page vector table. 

QCB: Queue control block. 

QCDBLK: Quickcell descriptor block. 
QEL: Queue element. 


queue control block (QCB): A control block 


that represents a set of resources (major 
QCB) or a single resource (minor QCB). 


queue element (QEL): A queue element used 


to represent one request for a particular 
system resource. Queue elements are used 
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in handling the serial use of a system 
resource by different programs. 


quickcell: A small unit of storage (rang- 
ing from 8 to 240 bytes) in the system 
queue area or a local system queue area 
that is allocated upon request for a short- 
lived control block. Allocation of a quic- 
kcell is faster than normal GETMAIN alloca- 
tion, and use of quickcells reduces storage 
fragmentation. 


quickcell area: A portion of the system 
queue area or a local system queue area 
that contains quickcells. 


quickcell descriptor block (QCDBLK): A VSS 


control block that describes a quickcell 
area in the SQA or an LSQA. 


quiescing: (1) The process of bringing a 
device, an activity, or a system to a halt 
by rejection of new requests for work. (2) 
The process of bringing a multiprogramming 
system to a halt by rejection of new jobs. 


RB: Request block. 


real address: The address of a location in 
real storage. 


real storage: The storage of a System/370 
computing system from which the central 
processing unit can directly obtain 
instructions and data, and to which it can 
directly return results. 


real storage allocation queue: In paging 
supervision, a queue on which a PCB is 


placed whenever a page frame is needed to 
satisfy a page-in request but no frame is 
currently available. 


REAL timing option: An option in the STIM- 
ER macro instruction. The option specifies 
that the requested time interval is to be 
decremented continuously, whether or not 
the task is executing. Contrast with TASK 


timing option. See also WAIT timing 
option. 


recursion: Reentry into a routine as a 
result of a failure in the routine‘s pro- 
cessing. The routine is entered at a point 
subsequent to the point of failure. 


recursive: Pertaining to a process in 
which each step makes use of the results of 
earlier steps. 


reference bit: A bit associated with a 
page in real storage; the reference bit is 
turned on by hardware whenever the asso- 
ciated page in real storage is referred to 
(read or stored into). In VS2, there is a 
reference bit in each of two storage keys 
associated with each page frame. 
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scan tables 


region: See virtual storage region. 


related higher-level task: On the suktask 
gueue for a job step, any task that was 


attached at a higher level and is connected 
through the task chain to a particular task 
keing discussed. Synonymous with antece- 
dent task. 


related PCB: A PCB whose request for a 
particular page can be associated with an 
already existing PCB that is accessing that 
same page. 


related subtask: On the subtask queue for 
a jok step, any task that was attached at a 
lower level and is connected through the 
task chain to a particular task being dis- 
cussed. Synonymous with descendant task. 


relocation feature: Preferred term is 
dynamic address translation. 


relocation hardware: Preferred term is 
dynamic address translation. 


reply queue element (RQE): A control ele- 


ment used to schedule asynchronous exit 
routines for data management. 


request block (RB): A control block that 
represents a module or routine to be 
executed on behalf of a task. See also 


interruption request block, program request 
block, system interruption request Llock, 
supervisor request block, and task inter- 
ruption request block. 


reserve replenish queue: In paging super- 
vision, a queue that is readied whenever a 


page must be freed to replace a page that 
was reserved for emergency SQA or LSQA use 
and has now been allocated to one of those 
areas. The queue may also be activated 
because the available page count was zero 
and the page replacement algorithm could 
not ke invoked immediately. 


root page control block (root PCB): A con- 
trol block then is used to control the 


posting for a set of required operations on 
a defined group of pages when the posting 
cannot take place until all of the opera- 
tions have been completed for all of the 
pages. 


root PCB: Root page control block. 
RQE: Reply gueue element. 


same-level tasks: Two or more subtasks 
that were attached by the same originating 
task. 


The section of the PVT (page 
vector table) that contains the headers for 
the PCB queues. 
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SCB: STA control block. 
SCT: Step control table. 
SDWA: STA diagnostic work area. 


second exit: A mechanism of alerting a 
routine that its request that a page be 
fixed and/or loaded has completed 
asynchronously. 


secondary paging device: An auxiliary 
Storage device that is not used for paging 


Operations until the available space on 
primary paging devices falls below a speci- 
fied minimum. Portions of a secondary pag- 
ing device can be used for purposes other 
than paging operations. 


segment: A continuous 64K area of virtual 
storage that is allocated to a job step or 
system task. Contrast with overlay 


seqment. 


Segment table (SGT): A table used in 
dynamic address translation to control user 


access to virtual storage segments. Each 
entry indicates the length, location, and 
availability of a corresponding page table. 


segment table entry (STE): An entry in the 
segment table that indicates the length, 


location, and availability of a correspond- 
ing page table. 


segment translation exception: A program 
interruption that occurs when a virtual 
address cannot be translated by the hard- 
ware because the invalid bit in the segment 
table entry for that address is set. 
Synonymous with program interruption code 
16. See also page translation exception, 
translation specification exception. 


SGT: 





Segment table. 


short-fixed: Pertaining to a request to 
fix one or more pages for a relatively 
short time. 


SIOT: Step input/output table. 

SIRB: System interruption request block. 
SLIH: Second-level interruption handler. 
Slot: A continuous area on a paging device 





in which a page can be stored. 


Slot group: A set of slots on one or more 
tracks within a cylinder on a paging 
device. 


Slot number: A part of an external page 
address that refers to a slot; together 
with a device number and a group number, it 
identifies the location of a page in 
external page storage. 


Slot queue: A list of elements in the sys- 
tem nucleus that define the page slots ., 
available on one paging device. A slot 
queue is built for each paging device. 


SMF: 


Snapshot dump: A selective dynamic dump 
performed at various points in a program. 


System management facilities. 


SOD: Swap-out device work table. 


Space record A record that separates pages 
in a page data set. 


SPCA: Swap communications area. 
SPCT: Swap control table. 

SPQE: Subpool queue element. 
SQA: System queue area. 

SQE: Supervisor queue element. 


STA control block (SCB): A control LElock 
that contains information to be used by the 
ASIR routine for scheduling a user's STA 
exit routine during abnormal termination of 
a task. 


STA diagnostic work area_(SDWA): A work 


area that contains information about an 
abnormally terminating task. The ASIR rou- 
tine uses the SDWA to schedule user-written 
diagnostic and retry routines. 


Stack: A list so constructed and main- 
tained that the list element available for 
retrieval is the one that was most recently 
stored in the list. (Also called a last- 
in, first-out (LIFO) list, or pushdown 
list.) 





STAR: System Task ABEND Recovery routine. 


STE: Segment table entry. 


step must-complete status: The status 
estaklished ky the control program that 


Signifies that a designated task is to be 
the only dispatchable task within a jok 
step. (Note that the initiator is also 
rade nondispatchable.) 


sukpool: All of the storage blocks allo- 
cated under a subpool number for a particu- 
lar task. 


subpool queue element (SPQE): A VSS con- 


trol block that describes allocated areas 
of storage assigned to a subpool. 


subsystem: A secondary or subordinate sys- 
tem, usually capable of operating indepen- 
dently of or asynchronously with a control- 
ling system. 
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subtask: A task that is initiated 
(attached) and terminated (detached) by a 
higher-level task. 


subtask queue for a_ job step: The chain of 
tasks that are associated with a particular 


job step, showing the order in which the 
tasks were initiated (attached). See also 


TCB queues. 


supervisor call (SVC) instruction: An 
instruction that interrupts the program 


being executed and passes control to the 
supervisor so that it can perform a specif- 
ic service indicated by the instruction. 


supervisor initialization: A general term 
referring to the execution of the initial 


program loader and the nucleus initializa- 
tion program in loading and preparing the 
control program for operation. 


supervisor lock: An indicator used to pre- 
vent entry to disabled code while a dis- 
abled page fault is keing resolved. The 
paging supervisor is not restricted by this 
lock. 


supervisor queue element (SQE): A control 


element used to schedule an asynchronous 
supervisor service. 


supervisor request block (SVRB): A request 
block that represents a type-2, type-3, or 


type-4 SVC routine that must be executed on 
behalf of a task. 


supervisor state: A state during which the 
central processing unit can execute input/ 
output and other privileged instructions. 
Contrast with problem state. 


SVC fix delay queue: In paging supervi- 
sion, a queue on which fix requests 


(received through SVC entries to the FIX/ 
LOAD routine) are placed when they cannot 
be processed because the amount of fixable 
real storage has fallen below a specified 
minimum. 


SVC routine: A control program routine 
that performs or begins a control program 
service specified by a supervisor call 
instruction. 


SVC table (SVCTABLE): A table that 
describes all SVC routines included in the 
system at system generation. 


SVRB: Supervisor request block. 
SWA: System work area. 

SWAB: System work area block. 
SWAH: System work area header. 
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swap communications area (SPCA): A control 
block that contains information necessary 


to effect a swap-out operation and complete 
a Swap-in operation. 


Swap control table (SPCT): A control block 
that defines and reflects the status of a 


Swap-in or sSwap-out operation. 


Swap-out device work table (SOD): A 32- 
byte internal work area used by paging 
Supervision routines during swap-out 
processing 


Swap gueue: In paging supervision, a queue 
on which the Swap Interface routine flaces 
PCBS representing swap requests (SVC 115). 


swapping: In VS2 with TSO, a paging tech- 
nique that writes the active pages of a job 
to external page storage and reads pages of 
another job from external page storage into 
real storage. 


Synchronous: Occurring with a regular or 
predictakle time relationship. Contrast 
with asynchronous. 


system generation: The process of using an 
operating system to assemble and link 
together all of the parts that constitute 
another operating system. 


system interruption request block (SIRB): 
A singie request block in the system, used 


ky the system error task to represent an 
error-handling routine. 


system management facilities (SMF): An 
optional control program feature that pro- 


vides the means for gathering and recording 
information that can be used to evaluate 
system usage. 


system must-complete status: The status 
established by the control program that 


Signifies that a designated task is to be 
the only dispatchable task in the system 
(except for permanent system tasks which 
remain dispatchable). (The permanent sys- 
tem tasks are the paging task, the recovery 
management support task, the system error 
task, the dynamic support system task, the 
communications task, and the master sche- 
duler task.) 


system nucleus: That portion of the super- 
visor that resides in fixed frames in the 
lowest portion of real storage. 


system queue area (SQA): An area of virtu- 


al storage reserved for system-related con- 
trol k-locks. 


system queue origin list: See GOVRFLB. 
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system resource: Any facility of the com- 
puting system that may be allocated to a 
task. 


system work area (SWA): One or more seg- 
ments in virtual storage used as a work 


area for system programs. 


system work area block (SWAB): A VSS con- 
trol block that represents a SWA segment. 


system work area header (SWAH): A VSS con- 
trol block that begins a chain of system 


work area control blocks. 


target device: A general term for the 
device from which the page slot is to be 
assigned for a page-out operation. 


task control block (TCB): The consolida- 
tion of control information related toa 
task. 


task interruption request block (TIRB): A 
request block (one per task) that is used 


to represent a control program routine that 
must be performed asynchronously when syn- 
chronous execution is impossible. 


task level: A term that describes the 
position of one or more same-level tasks on 
a subtask queue in relation to other tasks 
on the queue. For the task(s) at one 
level, the originating task and all tasks 
above that task are called higqher- 

level tasks or antecedent tasks; all tasks 
below it are called lower-level tasks or 
descendant tasks. 


task post queue: In paging supervision, a 
queue on which a PCB is placed whenever a 
page is reclaimed in the process of a page- 
out or is no longer needed during a page- 
in. The PCB is placed on the queue to 
await processing that will determine wheth- 
er additional paging services must be 
performed. 


task queue: A queue of all the task con- 
trol blocks (TCBs) present in the system at 
any time, chained in order of dispatching 
priority. See also TCB queues. 


task switching: Saving the program status 
and task context of a task, and establish- 
ing the program status and task context of 
another task to effect the exchange of con- 
trol to the second task. 


TASK timing option: An option in the STIM- 


ER macro instruction. The option specifies 
that the time interval is to be decremented 
only when the associated task is active. 

Contrast with REAL timing option. See also 


WAIT timing option. 


TCB: Task control block. 


TCB queues: The two TCB queues are the 
subtask queue for the job step and the task 
queue. These queues consist of the same 
TCBs. On the subtask queue, the TCBs are 
in the order in which they were created for 
the job step. The ABENT routine uses this 
queue to establish the order in which a job 
step"s resources are freed. On the task 
queue, all TCBs are in order of dispatching 
Friority. The dispatcher scans down this 
queue to determine the TCB for the highest 
priority ready task. See also subtask 


queue for a_ job step and task queue. 


thrashing: A condition in which the system 
can do little useful work because of exces- 
Sive paging. 


time-of-day (TOD) clock: A System/370 CPU 
feature used to measure elapsed time in 
microseconds. It is a 64-bit incrementing 
binary counter. A one is added to bit 
fosition 51 every microsecond. Timer 
Supervision uses the time-of-day clock to 
calculate the time of day and maintain the 
current date. 


time slice control element (TSCE): A con- 
trol element used to control the dispatch- 
ing of tasks in a time slice group. 


timer queue element (TQE): The control 


block used by timer supervision to record 
the information necessary to schedule and 
process a request for a timed interval. 


timer units: A representation of a time 
interval request in which the least signi- 
ficant bit is the equivalent of 26.04166 
Microseconds. 


TIRB: Task interruption request block. 


TOD clock: Time-of-day clock. 


top terminating task: A task that is being 
abnormally terminated and is the highest- 


level task ina set of subtasks that must 
ke terminated. The full set of subtasks 
that must be terminated is called the chain 


of terminating tasks. 


TOE: Timer queue element. 
trace: (1) The record of a series of 


events. (2) To record a series of events 
as they occur. 


trace table: One ina chain of tables con- 
taining a history of a task's environment 
during processing. 


translation specification.exception: A 


Erogram interruption that occurs when a 
page table entry, segment table entry, or 
the control register pointing to the seg- 
ment takle contains information in an inva- 
lid format. Synonymous with program inter- 
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ruption code 18. See also page translation 
exception, segment translation exception. 


TSCE: Time slice control element. 


translation tables: 
ment tables. 


Page tables and seg- 


type-1 SVC message table: The table con- 
taining entries, supplied by a type-1 SVC 
routine, that indicates failures in the 
type-1 SVC routine. 


validity map: A control block that defines 
the storage addresses that can be referred 
to by a non-key-0 program in a virtual 
storage region. 


virtual address: An address that refers to 
Virtual storage and must, therefore, be 
translated into a real storage address when 
it is used. 


Virtual block number: The virtual address 
(that is, the segment number and page numb- 
er) associated with a page. 


virtual equals real (V=R) storage: An area 
of virtual storage that has the same range 


of addresses as real storage and is used 
for a program or part of a program that 
cannot be paged during execution. Pre- 


ferred term is nonpageable dynamic area. 
virtual equals virtual (V=V) storage: An 


area of virtual storage used for a program 
or part of a program that can Fe paged dur- 
ing execution. Preferred term is pageable 


dynamic area. 


virtual storage: Addressable space that 
appears to the user asS real storage, from 
which instructions and data are mapped into 
real storage locations. The size of virtu- 
al storage is limited by the addressing 
scheme of the computing system and by the 
amount of auxiliary storage available, 
rather than by the actual number of real 
storage locations. 


virtual storage region: A subdivision of 
the dynamic area that is allocated to a job 


step or system task. 
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virtual sukarea list (VSL): A control 
block describing an area of virtual storage 
on which some paging supervisor operation 
is to ke performed. 


V=R_ dynamic area: Preferred term is non- 
pageakle dynamic area. 


V=R_intercepted page: A page frame below 
the V=R line that is currently being used 


for a purpose other than as part of a V=R 
region and is now needed for allocation to 
a new V=R region. The page frame takle 
entry (PFTE) for the frame is marked so 
that, when the frame is released from its 
current use, it will be assigned to the new 
V=R regicn rather than Leing added to the 
available page queue. 


V=R line: The high address limit of the 
nonpageable dynamic area. 


V=R region: Preferred term is nonpageakle 
region. 
VSL: Virtual sukarea list. 


VSS: Virtual storage supervision. 


V=R_ root PCB queue: A queue of root PCBs 
awaiting deferred allocation. 


V=V_dynamic area: Preferred term is page- 


able dynamic area. 
V=V_region: Preferred term is pageakle 
region. 

An option of the 


WAIT timing option: 

STIMER macro instruction. The option spe- 
cifies that the requested interval is to tLe 
decremented continuously, and that the 
associated task is to be placed in the wait 


condition until the interval is completed. 


working set: The set of a user's pages 
that must be active in order to avoid 
excessive paging. 


XPT: External page table. 
XPTE: External page table entry. 
XTLST: Extent list. 


Index 


Indexes to program logic manuals are consolidated in 
the publication OS/VS Master Index of Logic, GY28-0603. 
For additional information about any subject listed on 
the following pages, refer to other publications listed 
for that subject in the master index. 
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Where more than one page reference is 
given, the major reference is first. 


ABBRANCH 412,720 
ABDAREA (ABDUMP work area) 
definition of 666 
format of 737 
ABDPL (ABDUMP component parameter list) 
definition of 666 
initialization of 624 
format of 744 
ABDUMP -- Control Blocks I routine 
diagram of 616 
entry-point name of 729 
module name for 724 
ABDUMP -- Control Blocks II formatting 
diagram of 618 
entry-point name of 729 
module name for 725 
ABDUMP FORMAT routine 
diagram of 636 
entry-point name of 729 
module name for 725 
ABDUMP FORMATO1 routine 
diagram of 636 
entry-point name of 729 
module name for 725 
ABDUMP FORMAT20 routine 
diagram of 638 
entry-point name of 729 
module name fcr 725 
ABDUMP FORMAT22 routine 
diagram of 638 
entry-point name of 729 
module name for 725 
ABDUMP FORMET routine 
diagram of 640 
entry-point name of 729 
module name for 725 
ABDUMP -- Header and PSW formatting 
diagram of 614 
entry-point name of 729 
module name for 724 
ABDUMP Interface routine 
diagram of 624 
entry-point name of 729 
module name for 725 
ABDUMP Mainline processing 
diagram of 612 
entry-point name of 729 
module name for 725 
ABDUMP -- Nucleus displaying routine 
diagram of 626 
entry-point name of 729 
module name for 724 
ABDUMP OUTPUT routine 
diagram of 634 
entry-point name of 729 
module name for 725 
ABDUMP OUTPUTS routine 
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diagram of 634 
entry-point name of 729 
module name for 725 
ABDUMP PRINT routine 
diagram of 634 
entry-point name of 729 
module name for 725 
ABDUMP -- QCB formatting 
diagram of 620 
entry-point name of 729 
module name for 725 
ABDUMP -- Register displaying 
diagram of 628 
entry-point name of 729 
module name for 724 
ABDUMP routine 
description of 523 
overview of 603 
synopsis of 710 
ABDUMP -- Save Area displaying 
diagram of 622 
entry-point name of 725 
module name for 725 
ABDUMP sukcomponent parameter list 
definition of 666 
initialization of 624 
format of 745 
ABCUMP -- Sukpool displaying 
diagram of 632 
entry-point name of 729 
module name for 724 
ABDUNMP -- Trace formatting 
diagram of 630 
entry-point name of 729 
module name for 724 
ABDUMP work area 
definition of 666 
format of 737 
ABEND ABDUMP phase 
diagram of 576 
entry-point name of 729 
module name for 721 
ABEND Close phase 
diagram of 584 
entry-point name of 729 
module name for 721,726 
ABEND Critical Error phase 
diagram of 596 
entry-point name of 729 
module name for 727 
ABEND Final Housekeeping phase 
Giagram of 586 
entry~-point name of 729 
module name for 722 
ABEND Initial Housekeering phase 
diagram of 566 
entry~-point name of 729 
module name for 720 
ABEND Initialization phase 
diagram of 558 
entry-point name of 729 
module name for 726 
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ABEND-in-progress flag 
setting of 527 
ABEND Interface with ASIR 
diagram of 562 
entry-point name of 729 
module name for 728 
ABEND Mainline processing 
diagram of 572 
entry-point name of 729 
module name for 727 
ABEND Must-Complete phase 
diagram of 592 
entry-point name of 729 
module name for 726 
ABEND Open phase 
diagram of 574 
entry-point name of 729 
module name for 726 
ABEND recursion 
check for 562,566 
definition of 601 
invalid 592,600 
reentry points for 729 
ABEND request 
Stacking of 566,572,576 
ABEND routine 
description of 522 
invocation of 558 
overview of 556 
recursions 600 
synopsis of 710 
ABEND/STA Interface Phase 1 
diagram of 650 
entry-point name of 729 
module name of 726 
ABEND/STA Interface Phase 2 
diagram of 654 
entry—point name of 729 
module name of 726 
ABEND/STA Interface Phase 3 
diagram of 656 
entry-point name of 729 
module name of 726 
ABEND/STA Interface Phase 4 
diagram of 660 
entry-point name of 729 
module name of 726 
ABEND/STA Interface routine 
description of 524 
overview of 642 
Synopsis of 710 
Abnormal End Appendage routine 
description of 367 
diagram of 366 
entry-point name of 729 
module name of 722 
Synopsis of 710 
abnormal termination (see termination) 
ABTERM Prologue routine 
diagram of 548 
entry-point name of 730 
module name for 725 
ABTERM routine 
overview of 522,546 
synopsis of 710 
active page 666 
active page queue 666 
address translation 3,666 
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address translation excertion 33 
addresses of control blocks 947 
AEQA, AEQJ, AEQS (see asynchronous exit 


queue) : 
alias processing , 
description of 666 


allocate queue 746 
allocated queue element (AQE) 
construction of 403 
format of 746 
normal release of 521 
allocating storage 
description of 397 
fer control Llocks 420 
for external pages 388,460,462 
for LSQA segments 434 
for quickcells 436 
for regions 440 
for SCA 401 
for SWA segments 454 
within LSQA 420 
within quickcells 438 
within regions 414 
within SQA 420 
allocation 
cancellation 240 
deferred 234 
fixed page 218 
long-fix 228 
reallocation 248 
SCA/LSQA page 228 
V=R region 234 
anchor work area 374 
APF (authorized program facility) 
definition of 16,666 
(see also TESTAUTH routine) 
APG (automatic priority group) alt 
definition of 16,666 
(see also dispatcher) 
APGCE (automatic group ccntrol element) 
format of 745 
purpose of 666 
Arpendages (PCI, CE, Abnormal End) routine 
description of 367 
diagram of 366 
entry-point name of 732,730,729 
module name of 723,722 
synopsis of 710 
AQE (allocated queue element) 
construction of 403 
format of 746 
normal release of 521 
ASIR (see ABEND/STA Interface routine) 
asynchronous exit queue 
construction of 72 
definition of 666 
purging of 584,596 
asynchronous exits 
scheduling of 600 
Suppression of 600 
ATRB subroutine 566 
ATTACH routine 
description of 71 
diagram of 70,72,74 
entry-point name of 730 
module name of 722 
Synopsis of 710 


| authorized program facility 16 ) 


Se 


automatic priority group control element 
(APGCE) 
format of 745 
purpose of 666 
automatic priority grouping 16 
auxiliary storage 
assignment of pages 386 
auxiliary storage administration 
description of 388 
modules in 706 
routines in 706 
Auxiliary Storage Manager 
description of 203,389 
diagram of 388,390,392 
entry-point name of 730 
module name of 722 
Synopsis of 710 
awaiting an event 
description of 86 
available page count (APC) 
decreasing of 253 
increasing of 251 


available page frame count 667 


available page queue 66/7 
available PFTE queue _ 66/7 
description of 203 


replenishing of 203 
availability of an enqueued resource 92 


667 
667 


mode 
mode 


basic control (BC) 
BC (basic control) 
BLDL routine 
entry-point name of 730 
function when used by the subroutines of 
contents supervision 178 
module name of 725 
Synopsis of 710 
BLDL table (see also fixed BLDI table) 
BLDMSG subroutine 592 
BOUNDTST subroutine 660 
branch delay queue 274 
branch entry page processing 217 
Build PCB routine 
description of 203,355 
diagram of 354 
entry-point name of 
module name of 722 
Synopsis of 710 


667 


730 


CALLPOST subroutine 258,274, 282 
causing a program to wait for one or more 
events 
description of 86 
CCHH calculation of 
CDADVANS 720 
CDALLOC subroutine 
function of 720 
CDATTR field 
use of 747 
CDATTR2 field 
use of 747 
CDCONTROL 
use of 747 
CDDESTRY routine 
function of 133 
fiowchart of 135 


342 


CDE (contents directory entry) 
aknormwal release of 586 
construction of 188 
definition of 667 
dump of 616 
format of 747 
normal release of 
purpose of 747 
release of 521 
CDEPILOG subroutine 
function of 172 
CDESCAN subroutine 
CDEXIT routine 
description of 133 
entry-point name of 730 
flowchart 135 
use by EOT 530 
CDHKEEP 
flowchart of 
function of 
CDLLSRCH 
function of 169 
CDMOPUP subroutine 
function of 169 
CDPURGE routine 
entry-point name of 732 
CDSEARCH subroutine 
function of 169 
CDSETUP subroutine 
function of 174 
CDUSE field 
use of 747 
CDXLPT subroutine 
change bit 667 
Channel End Appendage routine 
description of 367 
diagram of 366 
entry-point name of 730 
module name of 722 
synopsis of 710 
channel end interruption (CE) 
definition of 750 
processing of 366 


544 


632 


135 
133 


616 


channel program queue element (CPQE) 
format of 749 
purpose of 667,749 

channel program translation 667 


CHAP routine 


description of 77 
diagram of 76 
entry-point name of 730 


module name of 726 
Synopsis of 710 
CIRB routine (see also Stage 1 Exit 

Effector) 
description of 125 
diagram of 124 
entry-point name of 732 
module name for 726 
Synopsis of 714 
CKTHRESH routine 
module name of 720 
CLBRANCH 720 
CLEANUP subroutine 656 
clock comparator 667 
clock comparator queue 
closing data sets 
abnormal termination 


667 


580 
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forced closing 580 
normal termination 
CMPLOUT subroutine 
description of 331 
diagram of 330,332 
communication task WTOR purge routine 
communication vector table (CVT) 
definition of 667 
entry-point name of 
format of 754 
purpose of 754 
use of 754 
Completion codes issued by the 
Supervisor 953 
contents directory 
definition of 667 
illustration of 14 
registers on entry and exit 909 
contents directory entry (CDE) 
abnormal release of 586 
construction of 170,172 
definition of 667 
dump of 616 
format of 747 
normal release of 
purpose of 747 
release of 544 
contents supervision 
description of 13,163,710 
control blocks cross-reference table 947 
control blocks referenced/set matrix 950 
control and relocation dictionary (CTRLD) 
record 
format of 752 
purpose of 752 
CPQE (channel program queue element) 
format of 749 
purpose of 749 
CPU timer 667 
Create Page Table routine 
description of 305 
diagram of 304 
entry-point name of 730 
module name of 723 
synopsis of 711 
critical system task 
check for 562,566 
definition of 563 
processing of 562,566 
CRITPURG subroutine 592 
CRNRLNTH routine 
module name of 720 
CSPCHK routine 418 
module name of 720 
current task 
dump of 723 
purging of 721 
CVT (communication vector table) 
definition of 667 
entry-point name of 754 
format of 754 
purpose of 754 
use of 754 
CVTDATE 754 


528,530 


566 


754 


544 


DAT (dynamic address translation) 3,668 


data areas 735 


684 


data control block (DCB) 
validity of 606 

data extent block (DEB) 
aknormal release of 580 


J 


dump of 616 
I/O AVT (appendage vector table) 616 
data set 


aknormal closing of 584 
normal closing of 528,530 
user exits, closing of 660 

date, dump of 614 

CCB (data control block) 
definition of 165 
format of 165 

DCB parameter for LINK, LOAD, or XCTL 

processing 

use of 165 

(data extent block) 

abnormal release of 584 

dump of 616 

DECHPG subroutine 342 

deferring the request for an unavailable 

module 172,173 

Delay Post Queue Handler 
description of 285 
diagram of 284 
entry-point name of 730 
module name of 723 
Synopsis of 711 


CEB 


delayed post queue 274 
DELETE routine 
description of 187 


diagram of 186 
entry-point name of 730 
module name of 726 
synopsis of 711 
demand paging 668 
DEQ routine 
description of 97 
diagram of 96 
entry-point name of 730 
flowchart of 98 
module name of 728 
synopsis of 711 
CEQPFTE sukroutine 244, 248,252 
dequeue routine (see DEQ routine) 
descriptor queue element (DQE) 
definition of 668 
dump of 618 
format of 770 
purging of 521 
Destroy Page Table routine 


description of 307 
diagram of 306 
entry-point name of 730 
module name of 723 
Synopsis of 711 

DETACH routine 
description of 81 
diagram of 80,82 
entry-point name of 730 
module name of 727 
Synopsis of 711 

device 
fixed head 391 


moveable-head 391 
multiple-exposure 
Single-exposure 


338 
338 


directory 
of entry-point names 729 
of module names 719 
of SVCs 734 
disabled page fault 668 
dispatchability 
current task 151 
job step 151 
dispatcher 
description of 151 
diagram of 150 
entry-point name of 730 
module name of 725 
Synopsis of 711 
dispatching priority 
changing with the CHAP macro 76 
description of 77 
use of 77 
CDISPINIT routine 
module name of 721 
DLOSRCH subroutine 278 
dormant state 668 
DOE (descriptor queue element) 
definition of 668 
dump of 618 
format of 770 
purging of 521 
DSAB, dump of 523 
dummy PQE 
construction of 401 
dump of 618 
format of 401 
purging of 521 
dummy TQE 499 
dump 
ABDUMP routine 603 
ABEND dump 576 
definition of 668 
dynamic 668 
Options 523 
SDUMP request 523 
SNAP request 576 
SVCDUMP 592,596,604 
user-specified 523 
dump data set 
allocation of 572 
closing of 580 
construction of a DCB for 574 
location of 574 
opening of 572,574 
DUMPMOD subroutine 628 
dynamic address translation (DAT) 3,668 
dynamic area 
definition of 8,668 
diagram of 8 


EC (extended control) mode 
definition of 669 

ECB (event control block) 
diagram of posting 88 
format of 771 
posting of 

by EOT 528 

purpose of 771 

enabled page fault (see page translation 

exception) 

enable/disable interruption 34 


ENQ routine 
description of 93 
diagram of 92 
entry-point name of 730 
flowchart of 98 
module name of 727 
Synopsis of 711 
ENQ/DEQ Furge routine 
description of 730 
entry-point name of 725 
flowchart 98 
Synopsis of 711 
ENQ Manual Purge routine 
invoked by ABEND 580 
invoked by EOT 528 
FNOMSG subroutine 592 
ENQPFTE subroutine 244,250 
Enqueue routine (see ENQ routine) 
ENTAB (entry table) 
format of 772 
purpose of 772 
entry point directory 729 
entry points 
directory of 729 
embedded, inforwing the supervisor 
of 188 
entry table (ENTAB) 
purpose of 772 
EOT (end-of-task) routines 
overview of 527 
synopsis of 711 
FOT (end-of-task) mainline processing 
diagram of 528,529 
entry-point name of 730 
module name of 721 
subroutines 
Dequeue IQE 
diagram of 528,529 
entry-point name of 730 
module name of 722 
Dequeue TCB 
Giagram of 534,536 
entry-point name of 730 
module name of 722 
Erase TCB 
diagram of 532 
entry-point name of 730 
module name of 724 
Purge TAXES 
diagram of 538 
entry-point name of 730 
module name of 722 
Purge Timer 
diagram of 540 
entry-point name of 730 
module name of 724 
Release Loaded Programs 
diagram of 542 
entry-point name of 730 
module name of 724 
Release Storage 
Giagram of 544 
entry~point name of 730 
module name of 724 
ESA (extended save area) 
zeroed ky STA Services routine 642 
ETCLOSE subroutine 528,530 
ETXR 
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effect when ATTACH is executed 70,72 


scheduled by EOT 528 
(ECB) 
88 


event control Elock 
Giagram of posting 
format of 771 
posting of 
by EOT 528 


event monitoring interruption 33 


event recording 33 


Exit Effector (see Stage 1 Exit Effector, 


Stage 2 Exit Effector, 


Effector) 
Exit routine 
description of 133 
Giagram of 132 
entry-point name of 
flowchart of 135 
module name of 720 
synopsis of 711 
EXLNL 773 
exposure, 
active 
inactive 
multiple 
Single 


device 

338,340 
338,340 
338,340 

338,340 


and Stage 3 Exit 


730 


extended control (EC) mode 


definition of 669 


extent list 


construction of 170,172 


dump of 616 
format of 892 
normal release of 
purpose of 892 


544 


External First-Level Interruption Handler 


description of 32 
diagram of 44 
entry-point name of 
synopsis of 711 
external interruptions 
external page address 
external page storage 
allocation of 404 


for batch processing TSO tasks 
external page storage management 
external page table (XPT) 
external page table entry (XPTE) 


format of 892 
purpose of 892 


730 
32 
669 
4O4 
203 
669 
669 


external storage management 203 


page migration 386 


processing by the Auxiliary Storage 


Manager 388 


processing by the Migration routine 


EXTRACT routine 
description of 79 
diagram of 78 
entry-point name of 
module name of 730 
Synopsis of 711 


Fast FIX routine 
description of 
Giagram of 280 
entry-point name of 
module name of 723 
Synopsis of 711 


281 


386 


730 


730 


FBQE (free block queue element) 


686 


407 
407 


construction of 
definition of 
dump of 616 
format of 774 
purging of 523 
searching 424 
FBQSRCH routine 
moudle name of 
FBQSRCHA 424,721 
FCOM 731 
FELEMENT 731,721 
FILTER subroutine 324 
Find Page routine 
description of 289 
diagram of 288 
entry-point name of 
module name of 723 
synopsis of 712 
FINDRB subroutine (ABDUMP) 
FINDRB subroutine (ASIR) 
FINDSCB subroutine 650 
fix accounting 221 
fix count calculation of 235 
fix counter (PCOUNT) 258 
FIX delay gueue 372 
Fix list 
aknormal release of 586 
normal release of 528 
Fix ownership element (FOE) 
description of 775 
purpose of 775 
FIX Purge routine 
description of 373 
diagram of 372 
entry-point name of 
module name of 723 
Synopsis of 712 
FIX Quiesce routine 
description of 373 
diagram of 372 
entry-point name of 
module name of 723 
Synopsis of 712 
FIX request 258 
FIX Restore routine 
description of 375 
diagram of 374,376 
entry-point name of 
mcdule name of 723 
Synopsis of 712 
FIXACCT subroutine 258 
FIXACT subroutine 218 
fixed 669 
fixed link pack area 


424 
721 


730 


616,626 
658 


731 


731 


731 


definition of 669 
fixed page 669 
fixing pages 

necessity for 259 


processing ky the Page Service Interface 
FIX/LOAD routine 258 
FIX/LOAD Asynchronous Completion routine 
description of 283 
diagram of 282 
entry-point name of 731 
module name of 721 
synopsis of 712 
FIX/LOAD codes 


completion 271 


return 271 
fix/load counter 258 
FIX/LOAD subroutine 
description of 259 
diagram of 258, 260, 262, 264, 266, 268,270 
entry-point name of 731 
module name of 721 
Synopsis of 259 
FIXQPURG subroutine 372 
FLISTADV 721 
FMAINB 721 
FMBRANCH 721 
FMCOMMON 721 
FMCOMM1 721 
FMSMFCRE routine 
entry-point name of 732 
FOE (f£1x ownership element) 
format of 775 
purpose of 775 
FOE Merge routine 
description of 287 
diagram of 286 
entry-point name of 731 
module name of 723 
Synopsis of 712 
FOEEDQ subroutine 286 
FOERMBR subroutine 286 
FORCLOSE subroutine 350 
FQE (free queue element) 
construction of 407 
definition of 407 
dump of 618 
format of 776 
purging of 521 


Searching 426,482 
updating 428,484 
frame 669 


frame number 669 

frame table 669 

frame table entry 669 

free block queue element (FBQE) 
construction of 407 
definition of 669 
dump of 523 
format of 774 
purging of 721 

free queue 669 

free queue element (FQE) 
construction of 407 
definition of 669 
dump of 618 
format of 776 
purging of 721 
searching 426,482 
updating 428,484 

FREE subroutine 
description of 275 
diagram of 274,276,278 
entry-point name of 274 
module name of 274 
Synopsis of 274 

Free V=R Pages subroutine 234 

FREEAUX 493 

freeing pages 
necessity for 275 
processing by the Page Service Interface 
FREE routine 274,276,278 

freeing regions 


V=R 238 

freeing storage (see releasing storage) 

FREELSQA 479 

FREEVMAIN routines 
description of 409,712 
error processing 466 
interface with EOT 466 
Macro instruction 397 

FREEPART 481 

FREESWA 491 

FRETRNi 468 

FTWORK 777 

FVARCHK 721 


GAM forced close macro 580 

GBLDAQE routine 
module name of 722 

GCOMM4G 412 

GCOMM5 412 

Generalized Trace Facility (GTF) 
activation of 562,596 
processing module, interface with 630 


recovery procedures for 562,596 
suspension of 576,608 

GERROR routine 466 
module name of 722 

Get LSQA Segment routine 434,712 


GETAUX routine 460 
descripticn of 460 

GETLSQA 434 

GETMAIN 
common routine 414,416 
error processing 466 
Macro instruction 397 
parameter list 413 
routines 412,712 

GETMAINB 722 

GETPAGE 457 

GETPART 441 

GETROOT subroutine 258 

GETSWA 454,456 

getting storage (see allocating storage) 

GETTJB, use by EOT 

GFQEUPDT routine 
description of 428 
module name of 722 

GFRECORE routine 
description of 426 
module name of 722 

GLIST 722 

GLIST1 722 

glossary 666 

GMBRANCH 722 

GMBRETRY 722 


GMCOMMON) 412,722 
GMCOMM1 722 
GMSMFCRE 


module name of 722 
GNOTSAT routine 464 


GNOTSATA 464,722 
GNOTSATB 464,722 
GNOTSATC 464, 722 


GOVRFLB 785 

graphics EOT routine 528 

group number 670 

GSPQESPC routine 
description of 422 
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module name of 722 

GTF (generalized trace facility) 17 
activation of 562,596 
processing module, interface with 630 
recovery procedures for 562,596 
Suspension of 576,608 

GTF Processing routine 630 

G4YKSRCH routine 
diagram of 458 
module name of 722 


hold page queue 670 


ID, user dump of 614 
ITEAHEAD 
meaning of 63 
IEAPGSWA routine diagrams 
of 454,456,490,491 
IEAPLSQOA routine 
diagrams of 434,478 
entry-point name of 723 
IEAPQCI routine 
entry-point name of 723 
IEAQTRCE 724 
IEASCSAV 30,40 
LEATCBP 
meaning of 151 
IEATPC (timer data area) 880 
IEAVPRTO routine 
module name of 725 
ITEAVVMSR 
description of 177 
diagram of 176 
IDENTIFY routine 
description of 189 
diagram of 188 
entry-point name of 731 
module name of 726 
synopsis of 712 
ILC (interruption length code) 
dump of 614 
INFOLIST (type-1 SVC message table) 
format of 786 
purpose of 786 
informing the supervisor of an embedded 
entry point 188 
INITSPCA subroutine 324 
INITSWA subroutine 650,654 
input/output block (IOB) 
set by STAR routine 160 
input/output interruption handling 
interpartition POST requests 
cancellation of 580 
interruption code 29 
interruption code 17 
definition of 673 
processing for 673 
interruption handling (see also I/O inter- 
ruptions, SVC interruptions, program 
interruptions, external interruptions, and 
Machine interruptions) 29 
interruption length code 
dump of 723 
interruption queue element (IQE) 
abnormal release of 566,580,596 
construction of 72 


29,38 


688 


dump of 618 
format of 788 
normal release of 529 
purging of 521 
purpose of 788 
interruption request block (IRB) 
construction of 521 
dump of 616 
format of 838 
normal release of 521 
purpose of 838 
interruption supervision 
description of 27 
registers upon entry and exit 8:95 
interruptions 
disabled 31 
enakled 31 
INTRFACE subroutine 624 
invalid page 370 
I/O active queue 370 
I/O error 
Error Recovery Program (ERP) 366 
nenpermanent 366 
permanent 366 
I/O (input/output) 
for dumps 608 
purging of 566,592,596, 600 
I/O FLIH (see I/O First-Level Interruption 
Handler) 
I/O First-~Level Interruption Handler 
description of 29 
diagram of 38 
entry-point of 731 
Synopsis of 712 
I/O interruptions 29 
I/O switch (IORGSW) 
function of 39 
IOB (input/output block) 
set Ey STAR routine 160 
IOBPROC subroutine 660 
IORGSW 39 
IQE (interruption queue element) 
aknormal release of 566,580,596 
construction of 72 
dump of 723 
format of 788 
normal release of 528 
purging of 521 
purpose of 788 
IQE gueue (asynchronous exit queue) 
abnormal release of 580,596 
construction of 72 
definition of 521 
nermal release of IQES 528 
IRB (interruption request block) 
construction of 124 
dump of 616 
format of 838 
normal release of 521 
purpose of 13,838 


jok name, dump of 614 
job pack area queue (JPAQ) 
definition of 670 
dump of modules 628 
normal release of modules, CDEs, and 
extent list 544 





L 


use of 165 
JOBNAME subroutine 364 
job step termination 592 
job-step task 
abnormal termination of 566 
definition of 671 
job-step timing 
in dispatcher routine 150 
in POST routine 88,90 
in WAIT routine 86 
JPAQ (job pack area queue) 
definition of 165,670 
dump of modules 628 
normal release of modules, CDES, and 
extent lists 544 
use of 165 
JSTCBSUB subroutine 218 


limit priority 
description of 671 
use of 76 
LINK macro instruction (see also LINK 
routine) 
link pack area (LPA) (see also fixed link 
pack area) 
definition of 671 
dump of 823 
link pack area directory 
definition of 671 
description of 166 
link pack area queue (LPAQ) 
definition of 671 
search of 166 
link pack directory entry (LPDE) 
format of 790 
purpose of 790 
LINK routine 
description of 171 
diagram of 170,172 
entry-point name of 726 
module name of 726 
LISTINIT subroutine 256 
LLECOUNT field 
meaning of 165 
LLE (load list element) 
construction of 165 
dump of 616 
format of 789 
normal release of 
purpose of 789 
load list 
definition of 671 
purging of 186 
release of 542 
load list element (LLE) 
construction of 165 
dump of 823 
format of 789 
normal release of 
purpose of 789 
release of 542 
LOAD macro instruction (see also LOAD 
routine) 
LOAD request 358 
LOAD routine 
description of 183 
diagram of 182 


528,542 


528, 542 


entry-point name of 182 
module name of 183 
Synopsis of 712 

local system queue area (LSQA) 
allocating 434 
definition of 671 
dump of 626 
location of 402 
normal release of 
Size of 402 
use of 402 

LOCATE subroutine 632 

long-fix count 
calculation of 235 

long-fix counter (LPCOUNT) 258 

long-fix processing 222 

LPA (link pack area) 
definition of 671 
dump of 823 

IPA directory 
definition of 671 

IPAQ 
definition of 671 
search of 166 

LPASET subroutine 324 

LPDE (link pack directory entry) 
format of 790 
purpose of 790 

LRA instruction 261 

LSQA (see local system queue area) 


532, 544 


Machine-Check Handler 29 
machine-check interruptions 29 
rajor CDE (see contents directory entry) 
master scheduler initiatocr/terminator 
routine 
use in task creation 63 
MB (message Luffer) 
format of 792 
purpose of 792 
MC instruction (see Monitor Call 
instruction) 
MCQEL subroutine 592 
flowchart of 594 
message buffer (MB) 
format of 792 
purpose of 792 
messages 
purging of 821 
table of messages issued by the VS2 
supervisor 954 
widnight TQE 499 
migration 
initiation of 386 
Migration routine 
description of 387 
diagram of 386 
entry-point name of 731 
module name of 723 
synopsis of 712 
minor CDE (see contents directory entry) 
rwinor QCB 834 
missing page exception (see page transla- 
tion exception) 
missing page interruption (see page trans- 
lation exception) 
missing page interruption processing 210 
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MODESET routine 
description of 159 
diagram of 158 
entry-point name of 731 
module name of 722 
Synopsis of 712 
module 
normal release of 228,230 
module directory 719 
Monitor Call instruction 33 
Move/Build/Relate PCB -- subroutines for 
queuing and dequeuing PCBs 
description of 361 
diagram of 360 
entry-point name of 360 
module name of 361 
Move Page routine 
description of 243 
diagram of 242 
entry-point name of 731 
module name of 723 
synopsis of 712 
Move PCB routine 
description of 353 
diagram of 352 
entry-point name of 731 
module name of 722 
Synopsis of 712 
MRELEASA 728 
MRELEASE routine 
module name of 728 
MSGPHASE subroutine (ABEND) 
entry-point name of 729 
module name of 573 
processing of 572 
MSPURG subroutine 566,572 
multiple-exposure device 338 
multiple job-step failure 566 
must-complete resources 566 
must-complete status 
clearing of 592 
definition of 566 
job-step must-complete status 566 
meaning of TCB flags 529 
processing of tasks 592 
setting of 566 
system must-complete status 566 
MVESA subroutine 600 


NEXTVMA subroutine 258,274 
nondispatchability flags, TCB 
Meaning of 867 
nondynamic area 
definition of 671 
description of 6 
nonpageable dynamic area 
definition of 671 
description of 6 
nonpageable region 
definition of 671 
NOPURGE subroutine 656 
note list 
format of 773 
purpose of 773 
nucleus 
dump of 626 


690 


OLTEP task 
terminating 562 
operator communication queues 521 


OPSW ; 
saving of 30 


organization 
of real storage 8 
of supervisor program 701 
of virtual storage 6 

overlay request 190 

cverlay segment takle (SEGTAB) 
definition of 672 
format of 850 

overlay supervisor 
description of 191,712 
diagram of 190 
entry-point names for 731 
module names for 191 
types of processing 190 


page 
availability 241 
usability 243 
page administration 
description of 706 
modules in 706 
routines in 706 
page control block (PCB) 
format of 795 
initialization of 795 
processing of 
allocate queue 218 
purpose of 795 
page data set 672 
page device information table entry 
(PDITE) wes) 
format of 799 
purpose of 799 
page device table entry (PDTE) 
format of 810 
purpose of 810 
page fault 
disabled processing 218 
program check processing 218 
page fixing 672 
fage frame 
availability 235 
shortage of 244 
Status 235 
rage frame table 672 
page frame table entry (PFTE) 
availability Frit 225 
format of 812 
purpose of 812 
Page Hook routine 
description of 371 
diagram of 370 
entry-point name of 731 
module name of 728 
Synopsis of 713 
page-in 672 
fage I/O initiation queue 672 
page I/O interruption processing 212 
Page I/O Post -- Page-out, Page-in, and 
Notification subroutines 
description of 293 


diagram of 292 ) 


L 


entry-point name of 731 
module name of 723 
synopsis of 713 
Page I/O Post Processor 
description of 291 
Giagram of 290 
entry-point name of 731 
module name of 723 
synopsis of 713 
Page I/O Supervisor 
description of 339 
Giagram of 338,340 
entry-point name of 731 
module name of 723 
synopsis of 713 
Page I/O Supervisor -- Building and Queuing 
Channel Program subroutines 
description of 343 
Giagram of 342,344,346 
entry-point name of 731 
module name of 723 
Synopsis of 713 
page migration 672 
page number 672 
page-out 672 
page reclamation 672 
page replacement algorithm 
description of 202 
processing of 244 
page replacement algorithm table 202,245 
Page Replacement -- Allocation Scheduling 
and Root Exit Processing 
description of 249 
Giagram of 248 
entry-point name of 731 
module name of 723 
Synopsis of 713 
Page Replacement routine 
description of 245 
Giagram of 244,246 
entry-point name of 731 
module name of 723 
synopsis of 713 
Page Service Interface routine 
description of 257 
Giagram of 256 
entry-point name of 731 
module name of 727 
synopsis of 713 
page-supervisor-in-control flag 295 
Page SVC interruption processing 215 
page table (PGT) 814,672 
page table entry (PGTE or PTE) 672 
format of 814 
purpose of 814 
page table origin (PTO) 289 
page task 
activation of 361 
Gefinition of 201 
priority of 201 
page translation 
definition of 672 
page translation exception 
invalid 608 
page vector table (PVT) 
definition of 672 
format of 820 
purpose of 820 


33,50,672 


page wait 672 
pageable region 
definition of 673 
paged dynamic area 
definition of 672 
description of 6 
Faging 
definition of 673 
raging activity 
abnormal release of 566,592,596, 600 
normal release of 528 
paging change bit 667 
EFaging device 673 
paging error 364 
raging exception (see page translation 
exception) 
Faging interface control 
description of 201 
modules in 706 
routines in 706 
raging rate 673 
paging reference bit 202 
Faging supervision 
description of 199 
raging supervisor 
algorithms 201 
page replacement 202 
task disable 202 
entries from 
branch entry 201 
dispatcher 201 
IOS appendage 201 
program FLIH 201 
SVC FLIH 201 
function of 14 
organization of 
auxiliary storage administration 201 
interface control 201 
page administration 201 
real storage administration 201 
registers on entry and exit 8:95 
Paging Supervisor Appendages (Channel 
End, Aknormal End) 
description of 367 
diagram of 366 
entry-point name of 
module name of 367 
synopsis of 713 
Paging Supervisor Appendages -- sukroutines 
for Freeing Resources and Handling Errors 
description of 369 
diagram of 368 
entry-point name of 368 
module name of 369 
Synopsis of 713 
Paging Supervisor Error Recorder 
description of 365 
diagram of 364 
entry-point name of 732 
module name of 723 
synopsis of 713 
faging supervisor termination routine 370 
paging supervisor TQE 499 
parameter list (ENQ/DEQ routine) 
format of 92,96 
partition queue element (PQE) 
definition of 673 
Gump of 823 


732,730,729 
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format of 818 
purging of 821 
purpose of 818 
partitioned data set directory entry (PDS 
DE) used by contents supervision common 
subroutines 165 
PARRLSE subroutine 572,600 
PASSBACK subroutine 258, 282 
PCB (page control block) 
format of 795 
purpose of 795 
PCB queue 
delayed post 210 
header, calculation of 352 
I/O active 210 
I/O initiation 210 
real storage allocation 210 
PCBROOT (root PCB) 
format of 797 
purpose of 797 
PDITE (page device information table 
entry) 
format of 799 
purpose of 799 
PDS directory entry 
(see also partitioned data set directory 


entry) 
used by contents supervision 
subroutines 167,192 
PDTE 810 


PDTESCAN subroutine 392 

PER (See program event recording) 

PFT 814 

PFTE 812 
address, calculation of 235 
removal of 252 

PFTE Dequeue routine 
description of 253 
diagram of 252 
entry-point name of 732 
module name of 723 
synopsis of 713 

PFTE Enqueue routine 
description of 251 
diagram of 250 
entry-point name of 732 
module name of 723 
synopsis of 713 

PFT-in-use queue 
location of 246 

PFT slot number 350 

PGT 814 

PGTE 814 

PICA (program interruption control area) 
construction of 608 
format of 815 
purpose of 815 

PIE (program interruption element) 
abnormal release of 566,580 
construction of 608 
dump of 823 
format of 816 
normal release of 528 
purpose of 816 

pointers to control blocks 947 
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POST routine 
description of 89 
diagram of 88,90 
entry-point name of 732 
module name of 725 
Synopsis of 713 
posting an event control block 
diagram of 88,90 
POE (partition queue element) 
definition of 673 
dump of 823 
format of 818 
purging of 821 
PRB (program request block) 
definition of 673 
dump of 618 
format of 838 
normal release of 821 
purpose of 838 
PRBHOSKP subroutine 572 
PREFIX subroutine 648 
Erimary paging device 673 
PRGQ subroutine 580,596 
Frogram 
abnormal release of 572,586,600 
normal release of 528 
organization diagrams 703 
Erogram check interruptions 34,52,54 
Program-Check Interruption Extension 
description of 349 
diagram of 348 
entry-point name of 732 
module name of 723 
synopsis of 713 
Erogram controlled interruption (PCI) 
definition of 367 
processing of 366 
program event recording 673 
Program Fetch Channel-End Appendage 
routine 
description of 197 
entry-point name of 732 
module name of 197 
synopsis of 713 
Program Fetch PCI Appendage routine 
description of 196 
entry-point name of 732 
module name of 721 
synopsis of 713 
Program Fetch routine 
description of 193 
diagram of 192,196 
entry-point name of 732 
module name of 197 
synopsis of 713 
Program Fetch work area 
description of 777 
format of 777 
initialization of 193 
purpose of 777 
Program First-Level Interruption Handler 
description of 32 
diagram of 46,48,50,52, 54,56 
entry-point name of 732 
Synopsis of 713 


program interruption code 16 673 
program interruption code 17 673 
program interruption code 18 673 
program interruption control area (PICA) 
construction of 608 
format of 815 
purpose of 815 
program interruption element (PIE) 
abnormal release of 566,580 
construction of 84 
dump of 823 
format of 816 
normal release of 528 
purpose of 816 
program interruption handling 32 
program, purging of 821 
program request block (PRB) 
definition of 673 
dump of 616 
format of 838 
normal release of 821 
purpose of 13,838 
protection of storage 9 
PSW, dump of 823 
PTE (page table entry) 
format of 814 
purpose of 814 
PURGEIO subroutine 652 
PURGERB subroutine 654 
PURGEFIX subroutine 370 
purging (see also CDPURGE) 132 
Purging PCBs subroutine 
description of 379 
diagram of 378,380,382 
entry-point name of 378 
module name of 379 
Synopsis of 379 
PVT (page vector table) 
format of 820 
purpose of 820 
PVTAPC (see available page count) 


QCALLOC routine 438 
CCB (queue control block) 
construction of 92 
format of 834 
major 
dump of 620 
purging of 521 
minor 
dump of 620 
purging of 521 
normal release of 521 
QCB queues 
construction of 92 
illustration of 92 
normal removal of element from 521 
origin of 92 
QCBMAJ (major queue control block) 
format of 834 
purpose of 834 
QCBMIN (minor queue control block) 
format of 834 
purpose of 834 
QCBRANCH 728 
QCDBLK (quickcell descriptor block) 
description of 436 


format of 836 
purpose of 836 
QCDE (quickcell descriptor entry) 
description of 436 
format of 436 
QCFREE 728 
CEL (queue element) 
construction of 92 
dump of 620 
format of 837 
normal release of 521 
purging of 521 
purpose of 837 
QPOINT subroutine 644 
CSEARCH subroutine 338 
gueue control ktlock (QCB) 
construction of 92 
format of 834 
ma jor 
dump of 620 
purging of 521 
minor 
dump of 620 
purging of 521 
normal release of 521 
queue element (QEL) 
construction of 92 
Gump cf 620 
format of 837 
normal release of 521 
purging of 521 
purpose of 837 
Queue Scanner (paging task) 
description of 363 
diagram of 362 
entry-point name of 732 
module name of 723 
synopsis of 714 
CUEUE Search subroutine (AQSEARCH) 228 
gueued (delayed) request processing 211 
quickcell 
allocation of 438 
definition of 674 
use of 404 
quickcell descriptor block (QCDBLK) 
description of 836 
format of 836 
quickcell descriptor entry (QCDE) 
description of 436 
format of 436 


RB (see request ;Llock) 
RB old PSW (RBOPSW) 
saving of 30 
real address 674 
real storage 
after initialization 8 
definition of 674 
eligible for nonpageable tasks 8 
Organization of 8 
real storage administration 
description of 705 
modules in 705 
routines in 705 
real storage allocation queue 674 
Real Storage Allocation routine 
description of 203 
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diagram of 218 
entry-point name of 732 
module name of 722 
Synopsis of 714 
real storage management 203 
dynamic storage 
eligible for paging 203 
V=R allocation 203 
non-dynamic storage 
allocation for supervisor use 203 
Real Storage Reclamation subroutine 
description of 225 
diagram of 224,226 
entry-point name of 224 
module name of 225 
Synopsis of 225 
REAL timing 674 
Real to Virtual Address Translation 
routine 
description of 351 
diagram of 350 
entry-~point name of 350 
module name of 351 
Synopsis of 351 
reclamation 
fixed page 218 
recovery management 29 
RECRBPRG subroutine 600 
recursions 33,674 
ABEND 
definition of 666 
entry points for 729 
processing 
for 562,566,576, 580,596, 600 
validity 596,600 


ASIR 
processing for 650 
valid 650 


definition of 33 
invalid 33 
STA Services routine 
processing for 644 
valid 33 
reference bit 674 
Region reference-validity map 406 
Region Validation subroutine 234 
register 
dump of contents 628 
registers upon entry or exit, tables 
of 895 
REGMAIN 412 
Relate PCB routine 
description of 357 
diagram of 356 
entry~point name of 732 
module name of 722 
Synopsis of 714 
Release -- subroutines for Searching PCBs 
and Freeing Real Storage 
description of 303 
diagram of 302 
entry-point name of 732 
module name of 303 
Synopsis of 714 
Release Queue Suppression routine 
description of 359 
diagram of 358 
entry-~point name of 732 
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module name of 723 
Synopsis of 714 
Release routine (Branch) 
description of 299 
diagram of 298,300 
entry-point name of 732 
module name of 723 
synopsis of 299 
Release routine (Supervisor SVC Branch) 
description of 297 
diagram of 296 
entry~point name of 732 
module name of 723 
Synopsis of 297 
Release routine (User SVC) 
description of 295 
diagram of 294 
entry-point name of 732 
module name of 727 
Synopsis of 295 
releasing storage 294,468 
description of 409,468 
external pages 294,492 
LSQA segments 478 
quickcells 488 
regions 409 
SWA pages 491 
SWA segments 490 
relocation address 348 
relocation list dictionary record 
format of 752 
use of 752 
REMOVERB subroutine 586 
flowchart of 590 
replenishment 
reserve queue 230 
REQLLE subroutine 574 
request block (RB) 
aknormal release of 588 
definition of types i11 
dump of 616 
format of 838 
(see IRB, PRB, SIRB, SVRB, TIRB) 
normal release of 588 
purging of 521 
use of 13 
request management 
page control block (PCB) 795 
processing ky the Queue Scanner 
routine 362 
request queue element (RQE) 
definition of 674 
format of 844 
purpose of 844 
queuing of 674 
requesting one or more resources via the 
ENQ macro instruction 92 
RESERVE macro instruction 
used in DEQ routine 92 
used in ENQ routine 96 
Reserve Replenish Queue Processor 
description of 231 
diagram of 230 
entry-point name of 732 
flowchart of 232 
module name of 723 
Synopsis of 714 
reset must-complete function 
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description of 566 
RESETHI subroutine 574,576,580 
resource queues for ENQ/CEQ requests 97 
resources 
release of 
normal 528 
responsibility count (LLECOUNT) 
format of 165 
use of 165 
restarting tasks 
RET parameter 
effect during DEQ processing 97 
effect during ENQ processing 93 
RETABEND subroutine 650,654 
RETCALL subroutine 550 
RLD buffer 
description of 752 
RLD record 
format of 752 
RMBRANCH 413 
Root PCB (PCBROOT) 
format of 797 
purpose of 797 
routine synopsis 710 
ROOTFREE subroutine 258,282 
RQE (request queue element) 
definition of 674 
format of 844 
purpose of 844 
queuing of 674 
RQE queue (see asynchronous exit queue) 


574,576,580 


SAPRINT1 subroutine 622 
SAPRINT2 subroutine 622 
SAPRINT3 subroutine 622 
Save area 
dump of 622 
purging of 821 
Scantree subroutine 277 
scan table entry 
calculation of 277,302 
SCANPFTQ subroutine 254 
SCANQ subroutine 242 
SCB (STAE control block) 
construction of 524 
format of 845 
purpose of 845 
release storage of 586 
SCHEDRT subroutine 586,600 
SCNTE 833 
SDUMP request 523 
SDWA (STA diagnostic work area) 
format of 846 
initialization of 650 
purpose of 846 
secondary paging device 675 
second exit 
deferring of 284 
SEGLD macro instruction 
linkage to the overlay supervisor 491 
SEGLD processor routine 
description of 190 
entry-point name of 732 
module name of 727 
segment 
allocation of 403 
definition of 675 





segment table (SGT) 852 
segment table entry (SGTE or STE) 
format of 852 
purpose of 852 
segment table origin register (STOR), use 
of 4 
segment translation exception 
SEGTAB 
(see overlay segment table) 
SEGWT macro instruction 
linkage to the overlay supervisor 491 
SELECT subroutine 566 
serializing the use of a resource 92 
set must-complete function 
description of 
for a job step 566 
for the system 566 
Set System Mask (SSM) instruction 
SETSPCT subroutine 324 
SGT (segment table) 852 
SGTE (segment takle entry) 
format of 852 
purpose of 852 
shared direct access device feature (SDASD) 
with the ENC/DEQ routine 16 
flowchart of 98 
Single-exposure device 338 
SIRB (system interruption request Llock) 
format of 838 
purpose of 13,838 
SLKM sukroutine 562,566,580,596 
slot 675 
Slot group 675 
Slot queue (SQ) 
format of 853 
purpose of 853 
SMF (system management facility) 16 
SMF 10-minute TQE 499 
SNAP request 523 
snapshot list, dump of 626,675 
SPCA (swap communications area) 
format of 854 
purpose of 854 
SPCT (swap control table) 
format of 858 
purpose of 858 
SPFRMAIN routine 
diagram of 470 
module name of 728 
SPIE routine 
description of 85 
diagram of 84 
entry-point name of 732 
module name of 726 
synopsis cf 714 
SPQE (sukpool queue element) 
construction of 407 
dump of 618 
format of 863 
normal release of 544 
SPREL 728 
SP253FR 728 
SQ (slot queue) 
format of 8:53 
purpose of 853 
SQA (system queue area) 
after initialization 401 
description of 401 


34,46,675 


34,48 
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dump of 626 
normal release of 544 
Size 401 
use of 401 
SQA/LSQA Allocation routine 
description of 229 
diagram of 228 
entry-point name of 732 
module name of 723 
Synopsis of 714 
SQA/LSQA reserve queue 202 
SQCTUPDT subroutine 342 
SQE (supervisor queue element) 
abnormal release of 566,580,596 
construction of 874 
definition of 675 
dump of 618 
format of 864 
purpose of 864 
scheduling of 550 
SSM (Set System Mask) instruction 34,48 
STA control block 
format of 845 
processing of 644 
purpose of 845 
release storage of 586 
STA diagnostic work area (SDWA) 
format of 846 
initialization of 650 
purpose of 846 
STA recursion 
validity check by ABEND 562 
STA Services routine 
diagram of 644 
entry-point name of 732 
module name of 726 
overview of 642 
synopsis of 714 
Stacking ABEND requests 566,572,576 
STACTCB subroutine 566,572,576 
STAE macro instruction 524 
Stage 1 Exit Effector (CIRB) 
description of 125 
diagram of 124 
entry-point name of 732 
module name of 726 
synopsis of 714 
Stage 2 Exit Effector 
description of 127 
diagram of 126 
entry-point name of 732 
module name of 725 
Synopsis of 714 
Stage 3 Exit Effector 
description of 129 
diagram of 128,130 
entry-point name of 732 
module name of 721 
Synopsis of 714 
STAI request 524 
STAR routine 
(see System Task ABEND Recovery Exit 
routine of the system error task) 
STATUS macro instruction 
description of 153 
STATUS routine 
description of 153 
diagram of 152.8 
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entry-point name of 732 
module name of 724 
synopsis of 714 
STAX count 
decremented ky EOT 527 
STE (segment table entry) 
format of 852 
purpose of 852 
stealing page frames 202 
step name, dump of 614 
STIMER routine 
description of 498 
diagram of 504 
entry-point name of 732 
module name of 726 
synopsis of 714 
STOR (segment table origin register), use 
of 4 
storage 
aknormal release of 586 
allocation of 395 
normal release of 528 
protection 9 
Storage gueue origin list (GOVRFLB) 
format of 785 
purpose of 785 
subpool 
definition of 676 
dump of 632 
normal release of 544 
numbers and meaning 398 
use of 397 
Subpool queue element (SPQE) 
construction of 422 
dump of 618 
format of 863 
normal release of 544 
purging of 521 
subtask 
attaching a_ 70 
detaching a_ 80 
queuing a 92 
supervisor lock 
definition of 562 
ownership of 550,562,566,580,596 
supervisor queue element (SQE) 
aknormal release of 566,580,596 
construction of 422 
definition of 676 
dump of 618 
format of 864 
purpose of 864 
supervisor request block (SVRB) 
construction of 42 
dump of 616 
format of 838 
normal release of 521 
purpose of 13,838 
scheduling of 42 
supervisor trace 
activation of 35,558,604 
deactivation of 604 
Supervisor trace table 
definition of 35 
dump of entries 604 
initialization of 608 
SUSPEND subroutine 258 
Svc delay queue 274 
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SVC First-Level Interruption Handler 
description of 30 
diagram of 40 
entry-point name of 732 
Synopsis of 715 
SVC FLIH (see SVC First-Level Interruption 
Handler) 
Svc interruption processing 30,214 
SVC modules 
dump of 626 
Search for 626 
svc table 
format of 31 
function of 31 
SVC directory 734 
SVCDUMP routine 523 
control block used 603 
diagram of 604 
entry-point name of 732 
module name of 724 
overview of 603 
Synopsis of 714 
SVC Second-Level Interruption Handler 
description of 31 
diagram of 42 
entry-point name of 732 
Synopsis of 715 
SVRB (Supervisor request block) 
construction of 31,42 
Gump of 616 
format of 838 
normal release of 521 
purpose of 838 
SWA (see system work area) 
SWAB (see system work area block) 
format of 865 
purpose of 865 
SWAH (see system work area header) 
format of 866 
purpose of 866 
Swap communications area (SPCA) 
format of 854 
purpose of 854 
SWAP Control routine 
description of 309 
diagram of 308 
entry-point name of 733 
module name of 723 
Synopsis of 715 
Swap control table (SPCT) 
format of 858 
purpose of 858 
Swap SVC Interface routine 
description of 385 
diagram of 384 
entry-point name of 733 
module name of 385 
Synopsis of 715 
Swap-in Completion routines for Stages 1, 
3, and 4 Completion 
description of 315 
diagram of 314,316 
entry-point name of 733 
module name of 723 
Synopsis of 715 
Swap-in Completion subroutine 
description of 319 
diagram of 318,320,322 


entry-point name of 733 


module name 
synopsis of 


Swap-in processing 


Swap-in Set-up 
description 
diagram of 
ent ry-point 
module name 
Synopsis of 


of 723 
715 


310 


subroutine 


of 311 
310 
name of 
of 311 
311 
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Swap-out -- CMPLOUT subroutine 


description 
diagram of 

ent ry~ point 
module name 
Synopsis of 


of 331 
330 ,332 
name of 
of 331 
311 
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Swap-out Completion routine 


description 
diagram of 

ent ry- point 
module name 
synopsis of 


of 329 
328 
name of 
of 728 
715 


733 


Swap-out Control subroutine 


description 
diagram of 

entry-point 
module name 
Synopsis of 


of 325 
324 ,326 
name of 
of 325 
325 
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Swap-out -- External Address Assignment 


subroutines 
description 
diagram of 
entry-point 
module name 
Synopsis of 

Swapping 676 

SYNCH routine 
description 
diagram of 
entry-point 
module name 
synopsis of 


of 335 
334, 336 
name of 
of 335 
335 


of 181 
180 

name of 
of 726 


routines 


system error task 
entry-point name of 733 


module name 
use of 160 


of 728 


7133 


126 


710 


system interruption request block (SIRB) 


format of 
purpose of 


838 


13, 838 


system management facility (SMF) 16 


System queue area (SQA) 
after initialization 


description 


dump of 626 


of 401 


401 


normal release of 544 


Size 401 
use of 401 


System Task ABEND Recovery (STAR) Exit Rou- 
tine of the System error task 


description 
diagram of 

ent ry-point 
module name 
synopsis of 


of 161 
160 
name of 
of 728 
160 


System work area (SWA) 


allocating pages in 


7133 


456 


allocating storage for 454 
System work area block (SWAB) 
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format of 865 
purpose of 865 
System work area header (SWAH) 
format of 866 
purpose of 866 


task control block (TCB) 
abnormal release of 580,586 
construction of 63 
definition of 677 
dump of 616 
format of 867 
new TCB address 532 
normal release of 528,532 
old TCB address 532 
purging of 521 
queuing of 63 
validity of 608 

task disable algorithm 
calculations used 202 
description of 202 
processing of 254 

Task Disablement Algorithm and Threshold 

Checking routine 

description of 255 
diagram of 254 
entry-point name of 733 
module name of 255 
Synopsis of 715 

task interruption reguest block (TIRB) 
construction of 550 
deactivation of 558, 566 
definition of 677 
dump of 616 
format of 838 
purpose of 13,838 

task I/O table 
DD entries of 572 
dump of 616 

task Post 290 

task post queue 677 

Task Post Queue Processor 
description of 291 
diagram of 290 
entry-point name of 733 
module name of 723 
Synopsis of 715 

task statistics table (TCT) 248 

task supervision 
description of 61 
registers upon entry and exit 895 

task switch 
definition of 677 
use of 148 

Task Switch routine 
description of 149 
diagram of 148 
entry-point name of 733 
module name of 725 
synopsis of 715 

task timing 677 

task timing queue 677 

TAXE 
abnormal release of 580 
normal release of 528,538 

TCAM Formatting routine 
interface with ABDUMP 624 
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TCAM Interpartition POST request, cancella- 
tion of 580 
TCB (task control block) 
aknormal release of 580,586 ) 
construction of 63 
definition of 677 
dump of 523,616 
format of 867 
new TCB address 532 
normal release of 528,532 
old TCB address 532 
purpose of 867 
queuing of 63 
ICT updating 432 
terminal attention exit element (TAXE) 
aknormal release of 580 
normal release of 528,538 
Termination Interface 
description of 521 
diagram of 370 
entry-point name of 733 
module name of 723 
synopsis of 715 
termination supervision 519 
abnormal 522 
performing (ABEND) 522 
scheduling (ABTERM) 522,548,550 
dumping storage 523 
ABDUMP 523 
SVCDUMP 523 
introduction 519 
normal (EOT) 521 
overview 526 
registers on entry and exit 895 
user exit routine (ASIR, STA) 524 
visual takle of contents 525 | 
terms 665 
TESTADDR 256 
TESTAUTH routine 
description of 157 
diagram of 156 
entry-point name of 733 
module name of 725 
Synopsis of 715 
thrashing 677 
time-of-day calculation 502 
time-of-day clock 677 
TIME routine 
description of 497 
diagram of 502 
entry-point name of 733 
module name of 726 
synopsis of 715 
time sharing link pack area 167 
time sharing oftion 16 
ATTACH routine with 70 
CHAP routine with 76 
DEQ routine with 96 
interregion POST with 88 
Stage 3 Exit Effector with 128 
STATUS routine with 152 
time slice control element (TSCE) 
pointers in 887 
time-slicing feature 17 
ATTACH routine with 70 
CHAP routine with 76 


dispatcher with 150 
termination of task 534 ) 


time stamp 614,58 
timer data area (IEATPC) 880 
TIMER Dequeuve routine 
diagram of 516 
entry-point name of 733 
module name of 724 
Timer Enqueue routine 
Giagram of 514 
entry-point name of 733 
module name of 724 
timer interruption handling 32 
timer queue element (TQE) 
abnormal release of 580 
format of 884 
normal release of 
purpose of 884 
timer requests 
cancellation of 540 
Timer Second-Level Interruption Handler 
description of 498 
diagram of 508,510,512 
entry-point name of 733 
module name of 725 
Synopsis of 715 
timer supervision 
diagram of 501 
introduction to 495 
registers on entry and exit 895 
TIRB (task interruption request block) 
construction of 124,550 
deactivation of 558,566 
definition of 677 
dump of 608 
format of 838 
purpose of 838 
top terminating task 
definition of 677 
determination of 566 
TPC (timer data area) 
format of 880 
purpose of 880 
TOE (timer queue element) 
abnormal release of 580 
format of 884 


528,540 


normal release of 528,540 
purpose of 884 
Trace function 35,58, 60 


trace table 35,58,60 

translation specification exception 

translation 
of virtual addresses 3 
tables 3 

TRDISP 728 

TREX 728 

TRIO 728 

TRPI 728 

TRSIO 728 

TRSVC 728 

TSCE (time slice control element) 
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